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PREFACE 


This publication, although a O-edition, is 
a major revision of the previously 
available publication LY24-5209-0. 


This manual is the first ina series of 
four manuals providing detailed information 
about the VSE/Advanced Functions Logical 
IOCS programs. The four manuals are: 


Volume 1: General Information and 
Imperative Macros, LY33-9116. 


SAM, LY33-9117. 
DAM and ISAM, LY33-9118. 
AM for DASD, LY33-9119. 


This first volume is mainly intended for 
persons involved in program maintenance and 
for systems programmers who are altering 
the program design. The volume contains 
general information about Logical IOCS as 
well as descriptive text and flowcharts 
about commonly used transients. Included 
in this manual are: 


1. The functions of logical IOCS, 
including a short description of the 
available access methods. 


Volume 23 


wn 


Volume 43 


———— 


2% The modular-tabular system. 

3% A short description of the declarative 
macros. 

4G. Complete description of the imperative 
macros. 

5% File initialization and termination. 


A detailed description of the open and 
close routines. 


ro A detailed description of DASD file 
protect routines. 


8. A detailed description of VTOC Display 
and Dump routines. 


9. Charts. 


In addition, this volume contains 
appendixes with information that is either 


Supplementary to LIOCS or is an aid for 
information retrieval. To the first 
category belongs the EBCDIC - ASCII 
conversion tables. To the second category 
belong the error message list, master error 
message list, and master index. 


Volumes 2, 3, and 4@ contain information 
relating to all the logical IOCS components 
necessary to process the file types 
described within those books. Exception to 
this approach is found in those routines 
that are either common to more than one 
access method or independent of file types. 
These routines, which include the open and 
close monitor, DASD file protect, and VTOC 
routines, are documented in this velume. 


PREREQUISITE PUBLICATIONS 


° IBM System/370 Principles of Operation, 
2-7000, in conjunction with 


GA2 
° M System/360 Principles of Operation, 
22-6821. 
/VS - DOS/VSE - VM/370 Assembler 
Language, RCSae 4010. 


° VSEZAF Data Management Concepts, 
GC33-6132. 


° VSE7Advanced Functions Macro User's 
Guide, $C33-6196. 


° VSE/Advanced Functions Macro Reference, 
$C33-6197. 


° VSE/Advanced Functions System Control 
Statements, $C33-6198. 


° VSE/7Advanced Functions Diagnosis 
Reference: Supervisor, LY33-910/7. 


ELATED PUBLICATIONS 


e VSE/ZAdvanced Functions Diagnosis 


Reference: aitial Program Load and 
Job Control, LY33-911 


e VSE/7Advanced Functions Messages, 
$C33-6098. 

For other related publications, refer to 

IBM System/370, 30xx and 4300 Processors 

Bibliography, GC20-0001. 
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INTRODUCTION 


The transfer of data between storage and 
the input/output devices attached to a 
system is controlled by the Input/Output 
Control System CIOCS). IGCS allows the 
problem programmer to specify: 


¢ What data has to be transferred. 
e Which I/O device is to be used. 


e In which sequence data transfer is to 
take place, 


VSE/Advanced Functions gives the problem 
programmer a choice of two input/output 
control systems: 


* Physical IOCS (CPIOCS) 
e Logical IOCS (LIOCS). 


Full details on physical IOCS can be found 


in VSE/ZAdvanced Functions Diagnosis 
Reference: Supervisor, LY33-9107. 


LOGICAL I0CS 


LIOCS performs the data management function 
required to locate and access logical 
records for processing. Some LIOCS 
routines are linked and executed as a part 
of the user's problem program. Others, 
notably SAM DASD and DAM LIOCS routines, 
are provided by IBM, loaded into the System 
Virtual Area (SVA) at IPL time, and are 


dynamically linked to the user's program. 
They provide an interface between the 
user's file processing routine and the 
PIOCS routines. Some of the data 
management functions performed by LIOCS 
are: 


e Blocking and deblocking of logical 
records. 


e Switching between I/0 areas when two 
areas are specified for a file. 


e Handling End-of-File (CEOF) and 
End-of-Volume CEOV) conditions. 


e Issuing requests to PIOCS to execute the 
appropriate channel programs. 


LIOCS makes use of two types of macro 
instructions to perform the required 
functions: imperative macro instructions 
and declarative macro instructions. 
Imperative macro instructions supply the 
facilities for reading» writing, blocking 
and deblocking, file labeling, and error 
checking. These instructions can be used 
only for data files that have been defined 
by declarative macro instructions. The 
declarative macro instructions specify the 
characteristics of a data file, such as the 
file name, I/0 device type, or 
organization. 


When LIOCS determines that a data area 
contains no logical record, it issues a 
physical IOCS macro instruction to execute 
the actual data transfer. Figure 1 on 
page 3 shows the relationship between 
logical and physical IOCS for a LIOCS 
imperative READ macro issued to an input 
file when one I/0 area is used. 
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LOGICAL IOCS PROCESSING METHODS 


Logical IOCS routines process records in 
any one of three ways: 


1. Sequentially, through the use of the 
Sequential Access Method (SAM). This 
method can be used with all files on 
serial devices (such as card readers, 
tapes, and printers), and with 
sequentially organized files on disk 
and diskette. 


use of the Direct 
‘i This method can 
on disk only. 


2. Randomly, through 
Access Method (DAM 
be used with files 


3. Both sequentially and randomly, poreush 
the use of the Indexed Sequential 
Access Method CISAM) or the Virtual 
Storage Access Method (VSAM). These 
methods can be used with disk only. 
VSAM is available to VSE users through 
the VSE/VSAM program product. 


Sequential Access Method (SAM) 


Sequential processing reads/writes and 
processes successive records ina logical 
file. For example, card records are 
processed in the order the cards are fed; 
tape records are processed starting with 
the first record following the header 
labels and ending with the last record 
before the trailer labels. DASD records 
are processed starting with the beginning 
DASD address and continuing in order 
through the records on successive tracks 
and cylinders up to the ending address. 


Diskette records are processed starting 
with the beginning diskette address and 
continuing in order through the records on 
Successive tracks up to the ending address. 


Volumes 2 and &@© contain a detailed 
discussion on sequential processing. 


Direct Access Method (DAM) 


The Direct Access Methor processes records 
contained on IBM disk devices that are 
usually organized in a random manner. DAM 
is a method for processing records rather 
than an organizational method. 


The location reference required by LIOCS 
for processing a file in a random manner 
consists of two parts: a track reference 
and a record reference. The record 
reference may be he record key» or, if no 
key areas are present, the record ID which 
is in the count area of each DASD record. 
Volume 3 contains a detailed description of 
random processing through DAM. 


Indexed Sequential Access Method CISAM) 


The Indexed Sequential Access Method can 
process records on a DASD device in a 
random and/or sequential order. Both 
orders use the control information that is 
in the key field of each record. The user 
supplies ISAM with the key (control 


information) of the desired record. ISAM 


searches for the record and makes it 
available for processing. 


In sequential processing, a series of 
records is made available. The first 
record to be processed is specified by the 
user. ISAM retrieves the succeeding 
records (on demand) from the logical file, 
in key order, until the problem program 
terminates the operation. 


ISAM creates an organized file and then 
adds to, reads from, and updates records in 
that file. The file is organized from 
records that are presorted by control 
information. As the DASD records are 
loaded, ISAM constructs indexes for the 
logical file. If records are added to the 
file at a later stage, ISAM updates the 
indexes to reflect the new records. Volume 
3 describes ISAM in detail. 


Virtual Storage Access Method (VSE/VSAM) 


The Virtual Storage Access Method can 
process records on a DASD device. It 
differs from the access methods mentioned 
so far in that: 


® It allows three different ways of data 
organization, each of which allows 
different ways of processing. 


e It includes a facility for automatic 
space allocation. 


e It includes a set of service programs 
that allow for the execution of a number 
of specialized functions. 


e It allows ISAM files that have been 
converted to the VSAM format to be 
processed using ISAM macros. 


e It offers device independence due to the 
special format of its physical blocks. 


e It offers data integrity control and 
access control by means of design, and 
integrity and access control options. 


In VSE/VSAM, a user may choose between 
three types of data organization: 


e Key-sequenced data organization. 

e Entry-sequenced data organization. 

e Relative-record data organization. 

In a key-sequenced organization, logical 
records are stored on the basis of a 
collating sequence determined by the 
content of the primary keys of those 
records. This key collating sequence is 
kept at all times. The key~sequenced 
organization is basically similar to the 
organization of an ISAM file. 


Key-~sequenced data organization allows for 
the following types of processing: 


e Keyed-direct processing. 
e Keyed-sequential processing. 


e Addressed-direct processing. 
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Problem Program Logicai I|OCS Physical 1OCS 1/0 Device 


Issue READ request (refer 
to the file description 
elsewhere in the program). 


Provide a new logical 
record from a physical 
block in the I/O area 
(deblock) to the problem 
program, 

or 


if actual input is required 
(new block), issue a 
physical read request 
(EXCP) 


WAIT 


When 1/O is complete, 
provide the first (or only) 
logical record from the 
new block in the I/O area 
to the problem program. 


Next instruction after 
READ request. 


Determine channel and: 


a) If channel is not busy, 


b) If channei is busy, place 


When I/O is complete, 
return to LIOCS via inter- 
rupt handling routine. 


start I/O Start device 


request into channel Data transfer 


queue and return to 
LIOCS. (Supervisor 
will retry later.) 


1/0 complete 


Figure l. Example of LIOCS and PIOCS Interrelationship 


° Addressed-sequential processing. 


In an entry-sequenced organization, logical 
records are stored physically in the same 
sequence in which they are entered. Newly 
added logical records are stored at the 
physical end of the file. This 
organization is basically similar to that 
of the SAM file. 


Entry—-sequenced data organization allows 
for the following types of processing: 


° Addressed-direct processing. 
¢ Addressed-sequential processing. 


In a relative-record organization, logical 
records are stored ina string of 
fixed-length slots, each of which has a 
relative-record number, starting from one 
up to the maximum number of relative 
records that can be stored in the file. No 
index is built. 


A slot may be empty or it may be 
occupied, in which case the record is 
identified by the number of the slot. For 
example, a record in the tenth slot of the 
file gets relative-record 10; it will 
always be the tenth record of the file 
regardless of whether or not records have 
been written into the preceding nine slots. 
A record is retrieved by its 
relative-record (that is, slot) number, the 
number being treated as a key. 


Virtual and Basic Telecommunications Access 
Methods (ACF/VTAM and BTAM-ES) 


VSE/Advanced Functions communicates with 
remote terminals with Advanced 


Communications Function/VTAM or Basic 
Telecommunications Access Method —- Extended 
Support. 


These processing methods are not 
documented, beyond an occasional reference, 
in this set of Diagnosis Reference Manuals. 
Specific information concerning ACF/VTAM 
and BTAM-ES is found in the ACF/VTAM and 
BTAM-ES publications. 


Storage Requirements 


Some logical IOCS routines are generated as 
part of the problem program, others 
(supplied by IBM) reside in the System 
Virtual Area and are dynamically linked to 
the user program. Imperative macro 
expansions, which serve as linkage to the 
logical or physical IOCS routines,» are 
generated inline at the point the macro is 
used in the problem program. The open, 
close, EOF/EOV, and other special purpose 
routines are called into the B-transient 
(logical transient) area as required. The 
physical IOCS routines used by logical I0CS 
are generated as part of the supervisor 
program. 


MODULAR-TABULAR SYSTEM 


The term tabular and modular indicate that 
the system uses tables in conjunction with 
data handling modules to implement its 
functicns. 


The modular-tabular system has the 
advantages of: 


Ss Saving assembly time by allowing the 
data handling modules to be generated 
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separately and to be stored in the 
relocatable library for subsequent use. 


° Using one module with many files if the 
device types are the same and the files 
are similar. 


The modular~-tabular combination for a 
specific file is generated by two 
declarative macros: the file definition 
macros (DTFxx) and the module generation 
macros (xxMQD). 


The file definition macros describe the 
logical file, indicate the type of 
processing to be used for the file, and 
specify storage areas (work area, I/O area) 
for the file. A number of file definition 
macros define the files processed by 
logical IOCS, and one defines files 
processed by physical IOCS CDTFPH). The 
file to be processed determines the type of 
file definition macro to be used. 


The module generation macros generate the 
data handling logic modules. These modules 
contain generalized routines needed to 
perform the functions of the logical IOCS 
imperative macros. The generalized 
routines in the logic modules are altered 
and made more specific through various 
Parameters (specified by the problem 
programmer) included in the xxMOD macro 
statements. It is possible, therefore, to 
generate many variations of a particular 
type of logic module, each specifically 
suited to the need of the problem 
programmer. For sequential DASD and DAM 
files, the data handling logic modules are 
provided by IBM. If the user provides a 
module in these cases» it is overridden by 
the IBM-supplied version. 


DECLARATIVE MACRGS 


DTF (Define the File) Macros 


Whenever logical IOCS imperative macro 
instructions are used in a problem program 
to control the transfer of records in a 
file, that file must be defined by a 
declarative DTF macro instruction. The DTF 
macro instruction describes (through 
various parameters specified by the problem 
programmer) the characteristics of the 
logical file, indicates the type of 
processing for the file, and specifies the 
main storage areas and routines. Figure 2 
on page 6 Summarizes the various DTF table 
types supported by VSE. Detailed 
descriptions of the logical Iocs file 
definition (DTF) macros and their 


Parameters appear in VSE/Advanced Functions 


Macro Reference. 


In general, the IBM-supplied file 
definition declarative macros are 
device-oriented. In addition, three 
declarative macros, DTFSR, DTFBG, and DTFEN 
are supported by VSE/Advanced Functions to 
provide upward compatibility from the IBM 
Basic Operating System (8K system). A 
brief description follows for each of the 


DIFCN. 


DTFCP. 


DTF macros available to users of 
VSE/Advanced Functions. 


DTFCD. Define The File for a Card Device. 
To define a file associated with the 
records on a card unit or on the 3881 


Optical Mark Reader. 


Define The File for a CoNsole. To 
define a file associated with the console 
printer-keyboard (3210 or 3215) or with a 
Display Operator Console. 


Define The File for a ComPiler. To 
provide limited device independence for 
IBM-written programs (COBOL, FORTRAN, 
PL/I). Because the DTFCP macro is written 
specifically to handle the needs of IBM 
internal programs, it is not documented in 
any System Reference Library publications. 


DTFDA. Define The File for Direct Access 

method. To determine a file when DASD 
(Direct Access Storage Device) records are 

Secs ey sere by the Direct Access 
ethod. 


DTFDI. Define The File for Device 
Independent system files. To define files 
assigned to the device independent system 
logical units SYSRDR, SYSIPT, SYSPCH, and 
SYSLST to provide DOS/VSE Assembler users 
Begone Same capabilities extended by 


DTFDR. Define the File for the 3886 

Optical Character Reader. To define a file 
soogcyerce with a 3886 Optical Character 
eader. 


DTFDU. Define the File for a Diskette 
Unit. To define a file associated with a 
3540 Diskette Input/Output Unit. 


DTFIS. Define The File for Indexed 
Sequential file management system. To 
define a file organized and processed by 
the Indexed Sequential File Management 
System. 


DITFMR. Define The File for Magnetic 
Recognition. To define a file associated 
with a Magnetic Ink Character Recognition 
C(MICR) device (1255/1259/1419) or Optical 
Reader/Sorter (1270-1275). 


DTFEMT. Define The File for Magnetic Tape. 
To define a file associated with a magnetic 
tape device. 


DTFOR. Define The File for an Optical 
Reader. To define a file associated wi 
an Optical Character Reader device (128 


it 
87 
DTFPH. Define The File for processing b 
PHysical IOCS. To define a magnetic tap 
diskette, or DASD file with standard lab 
that is processed by physical IOCS when t 
user wishes to use the OPEN and CLOSE 
macros for label processing. DTFPH 
parameters define the magnetic tape, 
diskette, and DASD files. No other files 
processed by physical IOCS require 
definition. 


y 
ep 
els 
h 


* These devices are not available in the United States of America. 
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Only the following logical I0CS functions 
can be performed for files defined by a 
DTFPH macro. 


e Check the header labels on input files, 
and close these files when requested. 


e Create header labels on output files, 
and create trailer labels when the file 
is closed. 


e Force end-of-volume on an output file 
when requested. (Force end-of-volume is 
not supported on diskettes.) 


When a DTFPH macro instruction is 
encountered at assembly time, the assembler 
builds a DTF table that includes only the 
parameters needed for the OPEN, CLOSE, and 
FEOV routines. The OPEN, CLOSE, and FEOV 
macro expansions call the open and close 
routines into the supervisor B-transient 
area at object time. 


DIFPR. Define The File for a PRinter. To 
define a file associated with a printer 
device, or a 2560 MFCM or 3525 Card Punch 
with the print feature. 


DTFPT Define The File for Paper Tape. To 
define a paper tape file. 


DTESD. Define The File for Sequential 
DASD. To define sequential files on a 
Direct Access Storage Device (DASD). 


DTFSR. Define The File in a SeRial type 
file device. To define a file for 
sequential processing of records on any 
TOCS supported I/0 device. 


The VSE DTFSR macro definition accepts 
either the BOS or BPS DTFSR macro as valid 
input. After determining the device type 
required, the VSE DTFSR macro calls, from 
the source statement library, the 
appropriate VSE DTF macro. The DTF macro 
called by the VSE DTFSR then sets up a DTF 
table in the usual manner. 


The VSE macro definition is used only t 
allow upward compatibility and DTFSR shoul 
not be used as a statement in the user's 
VSE source deck. 


DTIFBG. The BeGin-definition must be 
punched with DIFBG tin the operation field 
and DISK in the operand field. The name 
field is left blank. DTFBG is included in 
VSE to provide compatibility with the BOS 
DTFSR macro instruction. 


DTFEN. Define The Field ENd. To show 
there are no more DTF source statements to 
process. Only to allow upward 
compatibility for BOS and BPS users. 


ACB. The ACB macro produces an Access 
Method Control Block (CACB) for a VSE/VSAM 
file. The control block identifies the 
key-sequenced file and its index or the 
entry-sequenced file that 1s to be 
processed, and indicates the types of 
requests that are to be made. The ACB is 
Similar to a DTF in that it identifies the 
file to be processed. However, most 
information about the file» such as key 
length and record format, is specified in 
the DEFINE command of the access method 
services. Information supplied in this 
command resides in the VSAM catalog and is 
read into storage when the ACB is opened. 


fe) 
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| 
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T D |Description 


| aan file 


les 

!Paper tape files 

}Reader and 3881 Optical Mark Reader files 

iConsole. 

[Punch files 

|}Reader files on 2560, 542475425 

rinter files on 2560 

inter files 

ical Reader files except 3881 and 3886 files 

ical Reader files (HEADER=YES) 

netic Ink Character Recognition (MICR) and 

ical Reader/Sorter files 

6 Optical Character Reader files 

abeled tape work files 

abeled tape work files (compiler). (Note 1) 

standard or unlabeled tape files 

Adar labeled, output tape files 

ndard labeled, output tape files (physical IOQCS) 

ndard labeled, input tape files Cread backward) 

ndard labeled, input tape files (read forward) 

andard labeled tape work files 

iskette Input/Output Unit files 

quential DASD work files and data files 

SD work files (compiler) 

quential DASD files, MOUNTED= SINGLE (physiczl IOCS) 

irect access files 

irect access fil ED=ALL (physical IOCS) 

dexed sequentia 

dexed sequentia 

dexed sequentia 
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Figure 2. DTF Table Types 


Notes: 


Ly DTF type is X‘'30'" except for tape or DASD assigned to units SYSO000 
to SYSnnn. In this case, the DTFCP open phases change the DITF 
type to X'10' for tape work files, or X'20' for DASD work files. 


as DTF type is X'32' except for DASD assigned to units SYSO000 to 
SY¥Snnn. a this case, the DTFCP open phases change the DTF type 
re) 


to x'20"' r DASD work files. 
Ss The following control unit codes are ORed into the low-order 4 
bits of the DTF type code. 
Control Unit Code 
7770 1 
2848 3 
2701 4 
2/02 5 
2703 
G, The DTF tables for BTAM-ES files are not documented in this 
manual. They are documented in the BTAM-ES publications. 
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MOD (Module Generation) Macros 


cept DTFCN, DTFPH, 
nd DTFDI or IEG 


TES 
» a fi 
DASD and except DT 
ISK 

Ss 


D 
Pp 
PR 
=YES for PRT1 and 
e logic modules in 
inked to a logical IOCS modul 
rated by an xxMOD macro instruction. 
Se modules provide the necessary 
instructions to perform the input/output 
functions required by the problem program. 
For example, the module can read or write 
data, test for unusual input/output 
conditions, block or deblock records», or 
place logical records ina work area. 


i ’ 

C 38 
e t 
l e 
e 


mM D TA TNO 


Some of the module functions are 
provided on a selective basis, according to 
the parameters specified in the xxMOD macro 
instruction. The problem programmer has 
the option of selecting (Cor omitting) some 
of these functions according to the 
requirements of his program. The omission 
of some of these functions results in 
Smaller main~storage requirements for a 
particular module. 


There are two options for MOD macros. 
The user can: 


Ls Insert the MOD macro 


1 truction with 
its file parameters in 
b 


s 
the problem 

n this case, the 
e 


program source deck. n C ; 
d in line with 


logic module is assem 
the problem program. 


2s Choose to generate the logic modules 
needed for his file formats and system 
configuration. To do this, source 
decks using macro parameters to 
describe the file attributes are 
punched for each MOD macro statement. 
The logic module macro definition 
generates its oOwWn unique name, or the 
user can name the module in the name 
field of the MOD macro statement. The 
user name overrides the name the macro 
definition normally generates. 


For each type of xxMOD macro, the problem 
programmer can generate, by issuing the 
macro with varying parameters for each 
required module, many logic modules. The 
logic modules must be cataloged in the 
relocatable library. The CATALR control 
cards are automatically generated when the 
module is assembled. 


At assembly time, the Assembler produces 
an EXTRN CExternal Symbol) card for every 
V-type constant, or EXTRN statement, in the 
user program. At the time this program is 
link edited, the Linkage Editor resolves 
these EXTRN symbols. When these are 
resolved, the program is cataloged into the 
core image library, from which it is called 


for execution. 


TRACK HOLD FUNCTION 


The track Cor control interval) hold 
function provides DASD track protection 
when the parameter HOLD=YES is specified in 
the operand of he module generation macro 
(DAMOD/ISMOD) and the DTFSD/DTFDA/DTFIS 
macro. If a task has previously accessed a 


DASD track and is currently modifying a 
record from that track, DASD track 
protection prevents another task in storage 
from accessing that track. The task 
attempting to access the held track is put 
in the wait state until the track has been 
released. 


For DAM and 
e 


M, the problem program 
must issue th E 


A 

EE macro to release a 
track held on READ operation. The module 
automatically holds and releases all tracks 
for WRITE operations. 


For sequential DASD, the track is held 
and freed implicitly by the logic modules. 


The track Cor CI, for FBA) hold function 
1s applicable to four situations: 


1. Sequential DASD update files (data). 


2. Sequential DASD work files with the 
UPDATE=YES parameter specified. 


3. DAM files. 
4, ISAM files. 


Is 
FR 
EA 
1 


REENTERABLE MODULES 
A reenterable module is a logic module that 


can be used asynchronously, or shared, by 
more than one file. ncluding the 
RDONLY=YES parameter in the module 
generation macro generates a reenterable 
logic module. The RDONLY (Cread-only) 
parameter implies and assures, regardless 
of the processing requirements of any 
file(s) using the module, that the : 
generated logic module is never modified in 
any way. To provide this feature, unique 
Save areas, external to the logic module, 
are established, one for each task uSing 
the module. Each save area must be 72 
bytes and double-word aligned. A task must 
provide the address of its unique save area 
in register 13 before an imperative macro 
is tssued to a file and a logic module 
entered by the task. 


The IBM-supplied logic modules used for 
DAM and sequential DASD (DTFCP, DTFDA, 
DTFDI, DTFSD) files are read-only and 
re-entrant, but do not require the user to 
provide a save area address in register 13 
and will ignore such an address if 
provided. The same is true for logic 
modules used for tape support with DT 

Reenterable modules include: CDMO 
CPMOD, DIMOD, DUMOD, and ISMOD 


NSHIPS OF THE DECLARATIVE MACRO 


am 


TFDA, DTFDI, DTFDR, 
DTFMT, DTFOR, DTFPR, 
larative macros are 
They each generate 
ences an IOCS logic 
bytes of each table 
bbs iss a Command 
r 
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tailored to the particular device and file 
type. 


When one of these DTF macro instructions 
encountered at assembly time, the 

embler builds a DTF table tailored to 
DTF parameters. The table contains: 


° Device CCB. 


e A V-type statement used by the Linkage 
Editor to resolve the ee to he 
logic module with this DTF. For DTFMT 
the referenced logic module CIJJTCTL) 
processes only the CNTRL commands oa 
not opened magnetic tape files. Fo 
DTFSD, DTFMT, DTFDA and, DT FPR/DIZCP i f 
actual device is a PRT1 or 3800 printer, 
OPEN will dynamically fill in this field 
with the address of the IBM~supplied 
logic module. (Therefore for DTFSD and 
DTFDA zeros are generated. ) 

e Logic indicators; that is, one I/O area, 
two I/O areas, device type, and so on. 


¢ Addresses of all Cexcept work files) of 
eae areas and controls used by this 
evice. 


Regardless of the method of assembling 
logic modules and DTF tables (that is, with 
the main program or separately), a symbolic 
linkage results between the DTF table and 
the logic module. Normally, the linkage 
editor resolves these linkages at edit 
time. However, for logic modules that 


Problem program DTF table 


| 
| - 7 CRD DTFCD 
| 
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support SAM and DAM files on DASD, 
linkages are resolved at open time, 


the 


To accomplish the linkage between the 
DTF table and the logic module, see 
assembler generates a V-type addres 
constant in the DTF table and a hamed CSECT 
in the logic module. To resolve this 
linkage, the linkage symbols (module names) 
must be identical. Figure 3 shows the 
relationship of the program (the imperative 
macro), the DTF, and the logic module. 
Imperative macros initiate the action to be 
performed on the file by branching to the 
noe module entry point generated in the 
DTF table. CRD is the name of the file; 
TJCFAQZO the name of the logic module. 


IMPERATIVE MACROS 


The problem programmer issues imperative 
logical ITOCS macro instructions to initiate 
such functions as opening a file, making 
records available for processing, writing 
records that have been processed, 
controlling physical device operations, 
etc. Figure 4 on page 9 Summarizes the 
macro instructions provided by IBM for 
logical [0OCS. Figure 5 on page 11 further 
defines the general function of each of the 
macro instructions and indicates the 
devices with which they are used. 


Module 


>IJCFA0QZO CDMOD | 


= | 
PUT CRD - 
| - DC VCIJCFAQZO) 


Figure 3. 
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|SETDEV 

|SETFL 

\SETL 

| TRUNC 

| WAITF 

|WRITE 

| 4.Work files only. 


Figure 4& (Part 2 of 2). 
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3886 Optical 
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1270/1275 Optical 
Reader/Sorter 
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1. Applies only if DTFSR, DTFMT, DTFDA, or DTFPH LABADDR or XTNTXIT is specified. 


2. In the 2520 or 2540, GET normally reads cards in the read feed. If TYPEFLE =CMBND is specified, GET reads 
cards at the punch — feed —read station. For the 3881, the WORKNAME operand is invalid. 


3. Put rewrites on input DASD records if UPDATE is specified. 


4. In the 1442, 2520, or 2540, PUT punches an input card with additional information if TYPEFLE=CMBND is 
specified; PUT is specified by the 2560, 3525, and 5424/5425, if read/punch associated files are specified. 


5. Applies only to blocked input records, 
6. Applies only to blocked output records. 
7, Provided only for upward compatibility for BPS and BOS. 


8, Work files only. 


9. Applicable to 1419 and 1275 with the Pocket Light Feature. 


10. Not for 2560 or 5424/5425 with print feature. 


11. Display Operator Consol 


e only. 


12. CNTRL is treated as a no-op for FBA. 
13. Applies also to 3211 compatable printers (with device type code of PRT1). 
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IMPERATIVE MACRO EXPANSIONS 


For each imperative macro issued by the problem programmer, the 
Assembler program generates an in-line expansion that links the 
instruction to the DTF table (and thus the logic module) for the 
specified file. The filename used for the DTFxx macro describing the 
file must always be an operand of the imperative macro instruction. 


Typical expansions and brief descriptions of the function and 
peo ane of each of the logical IOCS imperative macro instructions 
ollow. 


CHECK Macro 


Label | CHECK|filename, PARAM 


| 

| L 1,=ACfilename) |Loads address of DTF table. | 
L »=ACPARM) Loads address of control field. * | 
| 7 ee Loads address of logic module. 


* Optional 


Function: ThisS macro instruction forces the program to wait for 
completion of the I/O operation started by a READ or WRITE macro for 
the data file specified. 


letion of the 
for the device 
is completed 


Procedure: This macro instruction waits for the c 
input/output operation, started by a READ or WRITE, 
associated with the filename. If the I/O operation 
without an error or other exceptional condition, HECK returns control 
to the next sequential instruction. If the operation results in an 
unusual condition (EOV, EOF, overflow, errors), CHECK processes the 
user's option specified in the DTF. Then, if the unusual condition is 
resolved, control returns to the user. Generally, if the unusual 
condition is not resolved, the routine posts a bit in some area set 
aside to indicate the condition, or issues a message to the operator 
on the system console printer. 


omp 
E 
Oo 
C 
t 


12 IBM VSE/Adv. Functions Diag. Ref. LIOCS Volume 1 


Licensed Program —- Property of IBM 
CLOSE Macro 


[Label |CLOSE]FILEA,FILEB,...,FILEn | 


FILEn = Symbolic address of the DTF table for the last file specified 
macro operand. 


operand. 
&N = N of last file +1. 


eS A SS ES VP? SS 


Function: The CLOSE macro instruction deactivates any file previously 
opened on any input/output unit in the system. The symbolic name of 
the logical file, assigned in the DTF header entry, is required in 
this instruction. Up to 16 files can be closed by one instruction by 
entering additional filename parameters. CLOSE is required whenever 
logical IOCS macro instructions have been used to transfer data, and 


the file has been previously opened. 
Procedure: The CLOSE macro instruction calls the Close Monitor, 
S$$BCLOSE, into the logical transient area to determine the device type 
assigned to the file. 
for PRT1 or 3800 printers with DTFPR, DTFDI or DTFCP with DISK=YES 
CLOSE frees the DTF extension created by OPEN and indicates in the 
DTF that the file is no longer available for processing. 


For other printers, card readers, card punches, CLOSE simply sets a 
bit off in the DTF table to indicate that the file is no longer 
available for processing. For magnetic tape, DASD, and MICR devices, 
the monitor calls the appropriate device-oriented close logical 
transient. For magnetic tape and DASD files, the CLOSE macro 
instruction causes trailer label processing for an input file, and 
trailer label creation for an output file, if necessary. If a 
magnetic tape file is being closed, the rewind option selected is 
executed. The file is deactivated by setting a bit off in the DTF 
table to indicate that the file is no longer available for processing. 


For Diskette I70 Unit input files, the diskette is fed out and the 
file is deactivated. For output files, the HDR1 label iS updated to 
reflect the proper end-of-data, the diskette is fed out, and the file 
is deactivated. The following table defines feed control: 


| Input | Output | Input -- | 
| Programmer j Programmer | System 

| | Logical Unit [ Logical Unit | Logical Unit 

| DTFCP A A N 

| DTFDI l NA NA | N 

| DTFDU | Ss | S | N | 
| DTFPH | A | A N | 
| A -- always feed at close 

| S -- user can suppress feed at close 

| N -- never feed at close 

| NA-- not applicable 
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CNOP ane | 

|} DC OF’ 

{LA Te ee eSBCLOSE® Fe irra to fetch Close Monitor. 
IJJCKxxx |BAL 0,*+44+4%(&N-1) Register 0O points to the address of the DTF 

| neve for the first file in the file list. 

| fe The second operand causes a branch to the SVC 

| l2 instruction. 

1DC 1A feyee of file list. 

| Dc la (The file list contains the addresses of th 

|. ae tables for all the files specified i 

\ | CLOSE macro operand.) 

ole poe een? Legaeeels of the DTF table for the last file 


eee in the CLOSE macro operand. 
SVC 2 Fetches the Close Monitor, $$BCLOSE. 
in the CLOSE 


N = Sequence number of a file ¢1, 2, 3) in the order it appears in the CLOSE macro 


Logical Unit 


PZzPr> 
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If physical IO0CS is used, CLOSE is required only when standard labels 
are to be checked or written. 


CLOSER Macro 


Label [CLOSERJFILEA,FILEB,...,FILEn 
CNOP 0;4 
IDC ;OF‘O* 
1B [*x+8 
| DC LAC) |Address used by CLOSER for relocation. 
ILA f1,*-4 Loads actual location address. 
|MVI |*-4,X°'58" Disable subsequent relocation. 
[L 1\0,*-1l2 Loads relocation factor. 
ISR {1,0 }1Finds displacement value. 
i (ene a |Gets Bearers. of DTF table for file to be 
opened 
| AR {0,1 Wes displacement value. 
ae fag »>TLJIJCxXxxxtN*4 coer new DTF table address to file list. 
| | |(The three instructions listed are repeated 
| |for each file specified in the OPENR macro 
} | loperand starting with FILEA.) 
LA »=C'SSBCLOSE’ Initializes to fetch $$BCLOSE. 
CNOP 0,4 | 
TJIJCxxxx BAL 0,*+44+4%(&N-1) Register O points to the address of the DTF 


|operand causes a branch to the SVC 2 


| 
| 
| table for first in the file list. The second 
| linstruction 


| | |CThe file list contains the addresses of the 
| | |IDTF tables for all files specified in the 

\. ] [CLOSER macro operand 

| DC |ACFILEn) JAddress of the DTF table for the last file in 
| | |lthe CLOSER macro operand. 

svc 2 Fetches Close Monitor, $S$BCLOSE. 


FILEn = Symbolic address of the DTF table for the last file specified in the CLOSER 
macro operand. 


N = Sequence number of a file (1, 2, 3), in the order it appears in the CLOSER 
macro operand 


&N = N of the last file +1. 


LE ES SS SS SS SS SS ES YS SS A 
JS OT OE I I ES ST LS A SL SS SE ES SS SS AS SA 


Function: The CLOSER macro instruction deactivates files used by 
self-—-relocating programs. 


Procedure: The CLOSER macro instruction performs its function in the 
same manner as the CLOSE macro. 


CNTRL Macro 


| 

| 
| 1,= JLoa bx | x 
|} MVI {23(1),code |}Puts control code in the DTF table {| |x x 
| | | f delayed printer control. | [| | 
| LA |0,code oads control code. ;x*| | 
i L 115,161) lLoads address of logic module. |x| | 
| BALR /14,15 !1Branch to CNTRL routine in logic module. }*] ft 


or space immediate is specified. 
yed skip or space is specified. ae 
delayed and immediate skip and space are specified. 


ale Instruction assembled if ski 
a8 Instruction assembled if del 
ae Instruction assembled if bot 


Suu |; ugg 
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eee | CNTRL|I|filename,code;, n', n# 
j | L | »=ACfilename) |Loads address of DTF table. 
| ] MVI }72(C1),code {Puts command code for DMK, LMKs and ESP on a 3886 to the 
| | }CCW in the DTF. 
| MVC 1*+1101),fldname|[Generated if code is ESP and n# is fldname. 
| peeuane to second DC of parameter list (DC generated 
ater). 
| | MVC f*+1101),0Cr) |Same, but n* is a register. 
| | BAL 10,%*+6 |\Generated if n*# is a number. 
} } DC JALICn?) JAlways generated if BAL is generated. 
/ } DC [AL1(n?) l|\Generated if code is LMK or ESP and n? is 
| } DC 1AL1(0) Generated if code is LMK or ESP and nn? is fldname or a 
| | | register. The value is filled in by one of the MVC 
| linstructions described above. 
| L 10,=A(fldname) {Generated if code is DMK or LMK and n? is fldname. 
| LR |O,r Same, but n* is a register other than register 0. 
| | L ee Loads address of logic module. 
| | BALR |14,15 IBranch to CNTRL routine in logic module. 
| 


CNTRL expansion for the 3886 Optical Character Reader. 


Function: The CNTRL (control) macro instruction provides commands for 
these input/output units: magnetic tape units, card reader-punches, 
punches, DASD, printers, and 3881 and 3886 optical readers. Commands 
apply to physical nondata operations of a unit and are peculiar to the 
unit involved. They specify such functions as rewinding tape, stacker 
selection of cards and documents, line spacing on a printer, etc. 

When a CNTRL macro is executed, the routine waits for completion of 
the operation before returning control to the user. On DASD, however, 
control returns at channel en 


Whenever CNTRL is to be issued in the problem program, the DTF 
entry CONTROL=YES must be included in the file definition Cexcept in 
DTFDR and DTFMT). 

The CNTRL macro instruction must not be used for printer or punch 
files, if the data records contain control characters and the entry 
CTLCHR= is included in the file definition (DTF) macro. 

The CNTRL macro may also be used to process sequential DASD (DTFSD 
TYPEFLE=WORK,RECFORM=FIXUNB) work files backwards. The Backspace (BSL) 
function is invoked as follows: 


CONTRL {filename]|(1)},BSL 


OQperands 

filename (1) The name of the file specified as a symbol or in register 
It must be the name of the file specified in the DTF. 

BSL Mnemonic code for backspace. 


As a result of the function code BSL, LIOCS sets the current position 
pointer back to the previous sequential record, unless one of the 
restrictions below applies. ( 1.e@. aSsume record n has been handled 
by the last request, then the positioning of the file after BSL will 
be the same as after a POINTR or POINTW to record n-1, unless one of 
the restrictions below applies.) BSL out of the End-of-Extent routine 
specified by the EOXPTR parameter results in a POINTR or POINTW to the 
last record successfully written. The BSL function code is the only 
one recognized, all others will be ignored. 


Violation of the following processing restrictions for BSL will 
result ina return code in register 0: 


Return code 8: 


For non-control-interval-format CKD files 
° BACKSPACE cannot cross EXTENT-limits or boundaries. The file was 
already or 1S now positioned at the beginning of an EXTENT (Cnot 


lst EXTENT). 


Return code 43 
For all files 
° BACKSPACE request was issued and the pointer was already 
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Move byte at 


number. 


notation. 


A CS EE ES EE AN RN SPY 
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positioned at the beginning of the file, for instance immediately 
after OPEN or after POINTS, or the pointer is now positioned at 
the beginning. 


Restriction: A WRITE UPDATE should not follow a BSL with re 
G or 8» task gets cancelled, if the file is positioned at th 
beginning of an extent CPOINTS like situation). 


turn code 
e 


Procedure:;The control routine waits for completion of any previous 
operation of the file. Then the device symbolic address is moved to 
the CCB. The command code is moved to the CCW, and the CCB address is 
loaded into register 1. Next an SVC 0 is issued to perform the 
control function indicated by the CNTRL macro instruction. Then 
control returns to the problem program. CNTRL is treated as a no~-op 
for sequential (DTFSD) files, unless BSL (backspace one logical 
record) and both RECFORM=FIXUNB and TYPEFLE=WORK are specified. 


DISEN Macro 


[Label ]DISENIfilename 


i: Mio) tee emc od aes address of DTF table. | 
| ‘pees cose address of logic module. 
IBAL 114,12¢€15) {Branch to DISEN routine in logic module. 


| 
| 
| 
| 
| 


Function: The DISEN (disengage) macro stops 
through a magnetic ink character reader (MIC 
Reader/Sorter. 


the feeding of documents 
R) r 


or Optical 


Procedure: The DISEN macro modifies the instructions in the CCW chain 
and sets the disengage bit (bit 0 of byte 21) in the DTF table. 
Control returns to the problem program at the next sequential 
instruction following the DISEN macro expansion without waiting for 
completion of the disengage operation. 


DSPLY Macro 


Label |DSPLY/[filename,r?i,ré 
L 1,=ACfilename)!{Loads address of DTF table. 


ee 
[MVC 


188(8,1),0Cr?) Puts Load Format CCW for document coordinates 
| lof field to be displayed in DTF table. 
196(016,1),0C€r4)] Puts Load Format CCW for document coordinates | 
lof reference : 

| |Imark for field to be displayed in DTF table. 
{15,16(1) [Loads address of logic module. 

114,20(15) 1Branch to DSPLY routine in logic module. | 


a NE SR a A 


| 
| 
PL 
|BAL 


Function: The DSPLY macro displays a specific field on the display 
scope of the IBM 1287 Optical Reader for entering the field from the 
keyboard. The DSPLY macro should be used in Document Mode only. 


The macro requires three parameters, none of which can be omitted. 
The first parameter is the symbolic name of the 1287 file as specified 
in the DTFOR header entry. This parameter may also be a register that 
contains the address of the file. The second parameter must be a 
register that contains the address of the CCN defining the coordinates 
of the field to be displayed. The third parameter must also be a 
register that contains the address of the landmark defining CCW. 


Procedure: If the reader cannot scan a complete field due to specific 
characters or fields running together, the field containing the error 
is retried by PIOCS. If still unsuccessful, the user is informed of 
the condition via his error correction routine (specified in the DTFOR 
COREXIT entry). The DSPLY macro is then issued to display the field 
in question on the 1287 display scope. The operator can then key in 
the correct characters. If an error is made in keying in the 
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characters, the operator should press the cancel key and then the 
enter key, and the field will be redisplayed. 


ENDFL Macro 


[Label lENDFLI| filename | 


ad 
Address of B-transient phase name. 
Ss phase $$BENDFL. 


an seabed 
— — 
AN aN NN NA 


Function: The ENDFL CEND File Load mode) macro instruction ends the 
ISAM mode initiated by the SETFL macro. The name of the file that has 
been loaded is the only parameter required, and must be the same as 
the name specified in the file definition (DTF) macro. 


Procedure: The ENDFL macro instruction performs a close operation for 
a file that was just loaded. It writes the last block of data 
records, if necessary, and then writes a DASD end-of-file record after 
the last record written. The EOF record is a DASD record with a data 
length of zero. The routine also updates the index entries as 
required,s and writes dummy index entries for the unused portion of the 
prime data extent. Control then returns to the problem program. 


ERET Macro 


[Label |ERET| : 
| 
| 


to 
o 
Oo 
G 
m 
Ss 
3) 
J 
a. 


If is SKIP. 
If operand is IGNORE. 
If is RETRY. 


Function: The ERET CError RETurn) macro returns control to a logic 
module from an error routine in the problem program when ERREXT=YES is 
specified in the DTF macro. The choice of one of the three operands 
provided (SKIP, IGNORE, or RETRY) allows the problem programmer to 
select the subsequent action of the logic module. The problem 
programmer should select hisS operand based on the nature of the error 
as analyzed within his routine. 


Procedure: An ERET macro issued in the problem program error routine 
generates a branch instruction to return control to the logic module. 
Register 14 in the generated branch instruction contains the address 
of the return point in the module. The macro operand (SKIP, IGNORE, 
or RETRY) supplies the displacement (0, 4, or 8 bytes respectively) 
from the return point of an instruction that returns control to the 
desired reentry point in the logic module. 


ESETL Macro 


eeu eee eee ens 

| L 1,=ACfilename)|Loads address of DTF table. 

| IL 15,161) |Loads address of logic module. 

| IBAL 114,20¢15) {Branch to ESETL routine in logic module. | 


Function: The ESETL CEnd SET Limit) macro instruction ends the 
sequential mode initiated by the SETL macro. 


Procedure: If blocked records are specified, ESETL writes the last 
block if a PUT macro was issued. 
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FEOV Macro 


| 
| 
| 


Function: The FEOV (Force End-of~-Volume) macro 
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Branch to FEOV routine 


Loads address of logic module. 


in logic module. 


instruction is for 


either input or output files on magnetic tape devices to force an 


end-of-volume condition when neither an EOF 


indicator nor 


a reflective 


marker has been sensed. It indicates that processing of records on 


one volume is considered finished; 


logical file are to be read from, or written on, 


but that more records for the same 
the following volume. 


Procedure: The FEOV macro fetches the proper phases to close the 
current volume and open the new volume. 


FEOVD Macro 


Label I|FEOVD| filename 


Nn c— 
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Function: The FEOVD (Forced End~of-Volume for Disk) macro 


is used for either input or output files 


instruction 


in sequential disk processing 


to force an end-of-volume condition before end-of-volume has actually 
been reached. It indicates that record processing on one volume is 
finished, but that more records for the same logical file are to be 


read from, or written on, the following volume. 
available on the new volume, the job 


The FEOVD macro fetches $$BOSDEV to 
a new volume. 


Procedure: When FEOVD is issued, an 
DTFSD. When the next GET or PUT is 
and the open transients are called. 


FREE Macro 


a 


Label|FREE |fil 
1 


is canceled. 


If no extents are 


close the current volume and open 


end of extent switch 


issued, 


end of extent 


is set in the 
is detected 


Functton: The FREE macro instruction releases a protected track (Track 


hold function included for Asynchronous Processing) on a direct access 


storage device. 


Procedure: The FREE routine in the logic module determines the seek 


address of the protected (held) track, 


control seek CCB into general register l1. 


SVC 36 to free the track. For sequential DASD files, 


and loads the address of the 
The routine then issues an 
FREE is treated 


as a no-op since the holding and freeing of tracks (Cor control 
intervals) is done implicitly by the logic modules. 
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GET Macro 

Label | GET |filename,PARAM* 
| L 1,=A( filename) |Loads address of DTF table. | 
| L »=ACPARAM) |Loads address of work area if specified. * | 
| L 15,161) }Loads address of logic module. | 
| | BAL 1[114,8(¢15) {Branch to GET routine in logic module. | 


* Optional 


Function: This instruction makes the next sequential logical record 
from an input file available for processing in either an input area or 
a specified work area. It is used for any input file in the system, 
and for any type of record: blocked or unblocked, spanned or 
unspanned, fixed or variable length, and undefined. When the GET 
routine detects an end-of-volume or an end-of-file condition, it calls 
in the EOV/EOF monitor, which initiates the correct file termination 
procedures. 


The GET macro instruction is written wit 
depending on the area where the records wil 


' ne or two parameters, 
form, but not both, can be used for one logi 

s 

h 


ro) 

be processed. Either 

al file. If records are 

to be processed directly in the input area( » the GET macro 

instruction requires only one parameter. This parameter specifies the 

name of the file from which the record is to be retrieved. The file 

pane ues be the same as the one specified in the DTF header entry for 
e ile. 


c 
) 
1 


The second parameter 185 optional, and if used», specifies the 
address (or a register containing the address) of the work area. This 
Parameter is used if records are to be processed in a work area 
defined by the user. The second parameter causes the GET routine to 
move each logical record from the input area to the work area. 


Procedure: Two input areas permit an overlap of data transfer and 
processing operations. Whenever two input areasS are specified, the 
LIOCS routines transfer records alternately to each area (except when 
combined files are specified). The LIOCS routines completely handle 
the switching of I/0 areas so that the next sequential record is 
always available to the problem program for processing. If the file 
is blocked, it is not necessary to transfer data from the input device 
to main storage on every GET instruction. Only when the first record 
ole block is required (blocked records), is it necessary to transfer 
ata. 


If overlap is possible, the transfer of data required for the 
current GET was initiated on a previous GET. If overlap is not 
possible, it iS necessary to start data transfer, read data, and wait 
for completion of the I/O operation. The handling of the data is done 
after a test for unuSUal condition iS made. Unusual conditions are: 
rae oF oe wrong-length record, irrecoverable error, no record 

ound, etc. 


LBRET Macro 


| Label |LBRET|2 | 


| 
| SVC 9 |Return to logical [f0CS. 
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Label|LBRET|3 


| LNR 1,1 |Put negative value in register 1. 
| isvce  |9 iReturn to logical IOCS. 


Function: The LBRET (LaBel RETurn) macro instruction provides the 
return from: 


x Your routine for the processing of additional user labels or 
nonstandard labels that you want to check or write. 


2% Your routine for any examination or processing of extent 
information during the direct access open of a DASD file. 


To return from a label processing routine (specified by the DTF entry 
LABADDR), issue the LBRET macro after each user's header or trailer 
label is processed. Tape files need an operand of 1 or 2, while DASD 
label routines use all three operands as required. 


To return from an extent processing routine (specified by the DTF 
entry XTNTXIT), issue the LBRET macro after handling each extent. An 
operand of 2 passes the next extent to your routine. After processing 
the last extent, an operand of 1 signifies to LIOCS that all user 
extent processing has been completed. 


Procedure for Tape and DASD Labels: 


da Input Files. The LBRET macro checks for an operand of 1. If one, 
the user label processing is terminated and any additional labels 
are skipped. If all the labels on an input file are to be 
processed, the LBRET 1 macro is not needed. That is, IOCS ends 
pLoec ae ne when the DASD end-of-file record or the tapemark is 
sensed. 


ran Output Files. LBRET 1 is required to return to logical IOCS when 
all user labels have been created and written. Otherwise, LIOCS 
terminates label processing after a maximum of 8 header or (where 
allowed) 8 trailer labels. 


Operand 1 is eee. for tape input files that contain nonstandard 
labels (FILABL=NSTD 

Operand 2 (Cinput file) returns to LIOCS after each additional user 
standard label has been checked. LIOCS makes the next label, if 
present, available for checking in the label input area. When Iocs 
senses the end of the label set (DASD end-of-file record or tapemark), 


it terminates label processing. 


Operand 2 (Coutput file) returns to LIOCS after each additional user 
Standard label except the last has been built. LIOCS writes the label 
from the label output area and returns to the user's label routine to 
permit him to build his next label. LBRET 1 terminates the label set 
eae is terminated after 8 header or 8 trailer labels have been 
wri en. 


For nonstandard tape labels, LIOCS branches to the user's label 
routine only once, and the problem program must read or write every 
required label before issuing LBRET 2 to return to LIOCS. 


Procedure for DASD Extents:;The LBRET macro checks for an operand of 2 
to determine if the user desires any additional extents for 
examination. Control passes between LIOCS and the user's routine for 
each extent requested until an operand of 1 terminates extent 
processing for this file. 


Operand 3 causes LIOCS to write a 
file. After writing the updated lab 
followed. 


Note: If register 15 is required in your routines save 
it, and restore the contents before returning to LIOCS 
macro instruction. 


ed label onto a DASD input 
ET 2 procedures are 


the 
Via 
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ame 
ial ee ion oe i 
| L 1,=A(C filename) |Loads address of DTF table. | 
| IL 10,=ACPARAM) [Loads address of user's 2-byte pocket light | 
| ieocae sane 

[ IL 115,16C1) Loads address of logic module. | 
| [BAL 114,16¢€15) pecan ie to pocket light routine in the logic | 

module. 


Function: The LITE macro turns on the 1275/1419 pocket lights 
specified by the problem programmer. 


Note: The problem program must issue a DISEN macro before issuing a 
LITE macro. 


Procedure: The LITE macro turns on the pocket lights that are 
specified by setting indicators (bits) ina 2-byte field identified in 
the macro operand. When all the specified pocket lights are turned 
on, control returns to the problem program at the next sequential 
instruction following the LITE macro expansion. 


NOTE Macro 


oads address of logic module. 
1Branch to NOTE routine in logic module. 


rm 
2 pt ee | my 
fuiw 


a 
e ename)|Loads address of DTF table. | 
C15) 


Function: The NOTE macro instruction retains the identification of a 
physical record just read or written in a specified file. 


The user must ensure that the previous operation was completed 
Satisfactorily by using the CHECK macro before issuing a NOTE. The 
record identification is placed in register 1. 


Procedure: For a tape file, this routine loads the physical record 
count into register 1, and control returns to the user. 


For DASD, register 1 is loaded with the four bytes identifying the 
cylinder, head, and record number (CCHR) or BBBn for control interval 
format, where: 

BBB = physical Block Number of the Control interval and 
n = the logical block number within the control interval. 


If NOTE follows a WRITE macro, the unused space remaining on the track 
or control interval is loaded into register Q. 
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OPEN Macro 

ahel [OPEN |FILEA,FILEB,...,FILEn 
eee [o.4 
|} DC }OF'O* 
[LA 11,=C*S$$BOPEN* Initializes to fetch the OPEN processor. 

TJJOxxxx [BAL 10,*¥+4+4%(&N-1) {Register O points to the address of the DTF 
| | ltable for the first file in the file list. 
| | |The second operand causes a branch to the 
| | ISVC 2 instruction. 
ine A CeTEAG iotare of the file list. 
|Dc |ACFILEB) 1(The file list contains the addresses of the 
|. | IDTF tables for all of the files specified in 
| | [the operand of the OPEN macro.) 
|DC |ACFILEn) aa of the DTF table for the last file 


FILEn = Symbolic address of the DTF table for the last file specified in the OPEN macro 


ET EE A TE SE A TN ST GS AES SERVE SINT Spm SpE Sm ee? <oyeruy Steal ma 


operand. 

N = Sequence number of a file (1; 2, 3; etc.), in the order it appears in the OPEN 
macro operand. 

&N = N of the last file +1. 


Function: The OPEN macro instruction activates each file in the 
problem program. The symbolic name of the logical file Cassigned by 
the DTF header entry) is entered in the operand field of this 
instruction. Up to 16 files may be opened with an OPEN macro 
instruction by entering the filenames in the operand field. If 
physical IOCS is used, OPEN is required only when standard labels are 
to be checked or created. 


Procedure: The OPEN macro instruction calls the OPEN processor, 
SS$BOPEN; into the logical transient area. The monitor checks for the 
device type assigned to the file, and calls the appropriate 
device-oriented open logical transient. The tape, diskette, and DASD 
open transients do all processing required to check or create standard 
labels for their respective files. For devices other than magnetic 
tape, diskette; or DASD an indicator is set in the DTF table to show 
that these files have been opened. For PRT1 or 3800 printers with 
DTFPR,», DTFDI or DTFCP with DISK=YES OPEN creates a DTF extension in a 
getvised area. 


OPENC Macro 


peas JOPENCISYSxxx?»S¥Sxxx2%,...6-SY¥YSXKXN 

| LA 1,=C'S$SBOPENC'|Loads address of B-transient name. | 
| BAL |0,IJJOxxxx Branch to fetch B-transient. | 
| [DC [ALI Cclass)} Logical unit class for SYSxxx!, | 
| | DC {ALi Cnumber)?# Logical unit number for SYSxxx!, { 
| 1DC |[ALIC€Cclass)® [Logical unit class for SYSxxx?. | 
| PDS ALE cauabeted= poeta unit number for SYSxxx?. | 
| |. | | 
| | DC |}AL1ICclass)n Logical unit class for last SYSxxx in list. | 
| {DC {AL1Cnumber)n Logical unit number for last SYSxxx in list. | 
sess ieee I1SVC | 2 |Fetches phase $$BOPENC. | 
| | 
| 


= a maximum of 16 symbolic units Ceither system or programmer) can be included in ed 


macro operand. 
[ES eee 
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Function: The OPENC macro instruction determines if a physical device 
is assigned to more than one of the symbolic units specified in the 
macro operand. A maximum of 16 symbolic units can be checked with a 
single macro instruction. 


Procedure: The OPENC macro instruction calls the logical transient, 
S$SBOPENC, which checks each symbolic unit specified in the macro 
operand in turn. S$SBOPENC determines the PUB entry address specified 
in the LUB for the corresponding symbolic unit, and compares it to the 
PUB entry addresses of each of the remaining symbolic units in the 
macro operand. If an equal comparison results between the PUB 
addresses of any two symbolic units, an error message is printed and 
the job 18S canceled. 


OPENR Macro 


Label | OPENR |FI 


Loads actual location address. 

Disable subsequent relocation. 

x+4 JLoads relocation factor. 
l\Finds displacement value. 
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l}Adds displacement value. 

JJOxxxx+4+G9N {Returns new DTF table address to file list 
i€The three instructions listed are repeated 
for each file specified in the OPENR macro 


4a 


| 
| »¥+8+4%(&N-1) Register O points to the address used for 
| }relocation. The second operand causes a 


| tart of file list 

| The file list contains ADCONS for the 
ddresses of the DTF tables for all the files 

| pecified in the operand of the OPENR macro.) 

JACFILEn) DCON for last file in file list. 


SVC 2 etches $S$BOPENR 


FILEn = Symbolic address of the DTF table for the last file specified in the operand of | 
the OPENR macro. 

N = Sequence number of a file (1, 2, 3, etc.), in the order it appears in the OPENR| 

macro operand. | 

N of the last file +1. | 
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Function: The OPENR macro instruction activates files used by 
self-relocating programs. In addition to the basic function performed 
by the OPEN macro, the OPENR macro relocates all the address constants 
within the DTF tables for the files specified in the operand field. A 
maximum of 16 files can be specified in the operand of a single OPENR 
macro instruction. 


Procedure: The OPENR macro instruction calls the logical transi 
SS$BOPENR to perform the relocation of the DTF table address co 
for each individual file. After the DTF address constants for 
files specified in the macro operand have been relocated, $$BQO 
calls the OPEN processor ($$BOPEN), then the Open Monitor (C$S$B 
to perform the actual open function. After all the specified 

are opened, control returns to the problem program. 
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POINTR Macro 


[Label | POINTR| filename, PARAM | 
! fi Farr Ss |Loads address of DTF table. | 
] PL 10,=ACPARAM) Loads address of field containing record identification. | 
} IL 115,161) Loads address of logic module. | 
| LBAL 114,16¢€15) {Branch to POINTR routine in logic module. 


Function: The POINTR macro instruction repositions the file to read a 
Mane ac bane or DASD record previously identified by a NOTE macro 
instruction. 


Procedure: If the file is on tape, this routine spaces tape either 
forward or backward until the block count in the DTF table reaches the 
value provided as a parameter of the POINTR macro. Then the file is 


backspaced so the record may be read. 


For DASD files, the POINTR macro instruction logic flow is the same 
as POINTW except track space is not considered. The POINTR macro is 
only used with IBM disk devices. 


POINTS Macro 


jee Bed EOINIS Sit enane 

| L 1,=ACfilename) Loads address of DTF table. 

| IL 115,16(¢€1) Loads address of logic module. 

| |BAL 114,24¢15) Branch to POINTS routine in logic module. 


Function: The POINTS macro instruction repositions a magnetic tape or 
DASD file to the beginning of the file. 


Procedure: For a magnetic tape file, a POINTS macro instruction 
rewinds the tape associated with the filename. If any_header labels 
are present, they are bypassed on the next READ or WRITE instruction. 
ane tape 15 positioned to the first data record following the label 
set. 


For a DASD file, a POINTS macro instruction positions the file to 
the lower limit of the first extent. The first record on the file is 
read or written when the next READ or WRITE macro instruction is 
issued for the file. 


POINTW Macro 


peace eee crete ee 

| L 1,=AC filename) Loads address of DTF table. 

| EL 10,=ACPARAM) Loadss address of field containing record 
| identification. 

| IL 115,16¢€1) Loads address of logic module. 

| |BAL 114,20¢€15) !Branch to POINTW routine in logic module. 


Function: The POINTW macro instruction repositions the file to write a 
magnetic tape or DASD record following the one previously identified 
by a NOTE macro instruction. 


Procedure: If the file is on magnetic tape, this routine spaces tape 
either forward or backward until the block count in the DTF table 
reaches the value provided as a parameter of the POINTW macro. 


For a DASD file, the DASD address of the record to be written is 


calculated. The POINTW routine determines if the record can be 
contained in the same extent used by the preceding record (the 
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preceding record is the one identified by the NOTE macro). If not; 
the Sequential DASD Open routine is called to open the required 
extent. When the correct extent is obtained, the CCW seek address is 
modified and the space remaining on the extent 18S updated in the DTF 
table. Control then returns to the problem program. 


PRTOV Macro 


Label | PRTOV[{ filename,CHAN,routine*x 


| [ 
| L »=A(filename)|Loads address of DTF table. 
| 0,=ACroutine) Loads address of user's overflow routine if specified. * | 
| } SR }0,0 {Zero register 0 if no user routine specified. | 
| L 15,16(1) Loads address of logic module. 
i OI 21¢€1),1 Sets channel 9 bit in DTF table if CHAN is 93; otherwise, | 
| Ichannel 12 assumed. % ¥ 
| | 


| 
| BAL corns tRrSaneh to PRTOV routine in logic module. 
I a a ne ee a eg 


* Optional 
**® Only if CHAN=9 


Function: The PRTOV (CPRinTer OVerflow) macro instruction specifies the 
operation to be performed when an overflow condition 18S reached on a 
printer. Whenever this macro instruction is to be issued ina problem 
program, the DTFPR or the DTFSR entry PRINTOV must be included in the 
file definition. 


Procedure: The program performs the functions specified by the problem 
programmer. That is, skip to channel 1 ana 9 oor 12, or perform his 
own functions when a Yor 12 is sensed. If skip to channel 1 ona 9 
or l2 is desired and a 9 or 12 is sensed, skip to channel 1 is placed 
in the CCW chain. Then, an SVC 0 executes the skip and resets the 
channel 9 and 12 indicators. 


If a user routine 1s specified in the macro instruction, the 
Problem programmer may i1ssue any logical IOCS macro instructions 
(except another PRTOV) in his routine to perform whatever functions 
are desired. For example: Print total lines, skip to channel 1, and 
print overflow page headings. The user routine must return to LIOCS 
by a branch to the address in register 14. Logical IOCS supplies this 
address upon entry to the user's routine. Therefore, if LIOCS macros 
are used in the routine or if register 14 is used, the return address 
must be saved. 


PUT Macro 


Label | PUT f{filename,PARAM,controlx 


| | 
| L 1,=AC filename) }Loads address of DTF table. | 
| L 0,=AC(STLSP) Loads address of control field», if control = STLSP. x | 
| | L 10,=ACSTLSK) {Loads address of control field, if control = STLSK. x | 
f L 10,=ACPARAM) |Loads address of work area, if specified. * | 
| Oo! 4801),X'8o0" Sets indicator in DTF table if control = STLSK. * | 
| L 15,161) Loads address of logic module. | 
| BAL 114¢,12(¢€15) iBranch to PUT routine in logic module. 
| NI 48(01),X'7F* Resets control = STLSK indicator in DTF table. * | 


*¥ Optional 


Function: This instruction writes or punches logical records that have 
been built directly in the output area or in a specified work area. 
It is for any output file in the system (Cexcept work file), and for 
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blocked or unblocked, spanned or unspanned, fixed 
and undefined. It operates much the same as GET 


any type of record: 
? 
t is issued after a record is built. 


d 
or variable length 
but in reverse. I 


Similar to GET, the PUT macro instruction is written with one or 
two parameters, depending on the area where the records are built. 
Either form, but not both, can be used for one specified logical file. 
If records are built directly in the output area(s), the PUT macro 
instruction requires only one parameter. This parameter specifies the 
name of the file to which the record is to be transferred. The 
PT eneme must be the same as the one specified in the DTF entry for 

e ,Le. 


The second parameter 7185 optional and if used, specifies the address 
(or a register containing the address) of the work area. This 
parameter is used if records are to be built in a work area defined by 
the user. The second parameter causes the PUT routine to move each 
logical record from the work area to the output area. 


A third Coptional) parameter, CONTROL=, is included in the macro 
and for files assigned to printers with the Selective Tape Lister 
eature. 


cedure: Two output areas permit an overlap of data transfer and 
cessing operation. Whenever two output areas are specified, the 

CS routines transfer records alternately from each area (except for 
bined files). The LIOCS routines completely handle the switching 
I/O areas so that the proper area is available to the program for 

e next sequential output record. 


If a work area is specified, the output record is moved from the 
work area to the output area. 


With blocked files specified, it is not necessary to transfer 
information from main storage to the output device on each PUT 
instruction. Only if the logical record is the last record of a block 
is it necessary to transfer a physical record to the output device. 

If overlap is possible, the transfer of information need not be 
completed before another PUT requiring data transfer is issued. When 
overlap is not possible, the transfer of data must be completed before 
another PUT is issued. 


Tests are made for unusual conditions, which include: end of reel, 
wrong length record, irrecoverable error, no record founds etc. 


PUTR Macro 

aes {PUTR | filename,workout*®,workinp* 

| L 1,=AC(filename)|{Loads address of DTF table. 

} L 0,=ACworkout) Loads address of output work ere. 

| IL |2,=ACworkinp) Loads address of input work area. 

] OI 2(¢1),X'08'" Set action message indicator in CCB. 

| PL 15,1601) Load address of logical module. 

| IBAL 114,415) Branch to PUTR routine in logic module. 


* Optional 


Function: The PUTR CPUT with Reply) macro handles action messages that 
appear on the screen of the Display Operator Console. PUTR used with 
the 3210 or 3215 performs the same functions as a PUT followed by a 
GET. Moreover, the message non-deletion code for the Display Operator 
Console is then provided. 


Procedure: The PUTR macro is issued after a record has been built. It 
processes fixed-length records only. The PUTR macro is written with 
either one or three parameters, depending an the area in which the 
records must be built. Either form, but not both, can be used for a 
logical file. If the records are built in the I[/0 area, only the 
filename parameter is required. If the records are to be built ina 
user-specified work area, both workout and workinp must be specified. 
In this case, the record is moved from the work area to the I/0 srea. 
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In the case of overlap, information transfer need not be completed 
before the next PUTR requests new data to be transferred. If overlap 
is not possible, the next PUTR must wait for the completion of the 
previous PUTR. Tests are made for unusual conditions such as 

ooo eeee wrong length record, irrecoverable error, no record 
ound, etc. 


PUTR sets bit 5 of byte 3 in the CCB to '1'* to indicate an action 
message; it then passes control to logical I0CS, which executes a PUT 
immediately followed by a GET. 

RDLNE Macro 

fiadahaioieel aitallae {filename 

| L 1,=ACfilename) [Loads address of DTF table. | 
| [L 115,161) [Loads address of logic module. 

| |\BAL $14,4(15) I1Branch to RDLNE routine in logic module. | 


Function: The RDLNE macro provides selective online correction when 
journal tapes are being processed on an IBM 1287 Optical Reader. This 
macro reads a line in the online correction mode while processing is 
in the offline correction mode. 


Procedure: If the reader cannot read a character, logical I0CS retries 
the line containing the unread character. If still unsuccessful,» the 
user is informed of the condition via hisS error correction routine 
(specified in the DTFOR COREXIT entry). The RDLNE macro causes 
another attempt to read the line. If the character in the line cannot 
be read during this attempt, the character is displayed on the 1287 
display scope. The operator may key in the correct character, if 
Possible. If the defective character cannot be readily identified by 
the operator, he may enter a reject character in the error line. This 
condition is posted in byte 80 of the DTF table for uSer examination. 
Wrong length records and lost line conditions are also posted to byte 
80 of the DTF table. RDLNE should be used in COREXIT only; otherwise 
es line following the one in error will be read in online correction 
mode. 


The macro requires only one parameter, the symbolic name of the 
file from which the record is to be retrieved. This name is the same 
as that specified in the DTFOR header entry for this file. The 
filename can be specified as a symbol or itn special or ordinary 
register notation. 


READ Macro 


Label [READ [fil 


oo 
> 
~ 


| 
| 
14,246(01%5) If TYPE=KEY. * 
| 
: 
| 


BAL 14,0¢€15) If TYPE=MR. * 

LA 14,IJJRSYSNDX+10 Loads return address for TYPE=SQ. 
ITJJRSYSNDX! BAL 10,4¢€15) Branch to READ routine in the 

| | logic module if TYPE=SQ. 

{DC |ACPARAM) Address of input area. 

|} DC {\H*'length' 


Length of record to be read. | 


* Portion of macro expansion determined by TYPE= parameter. 
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ae |READ |filename,DR,PARAM1,PARAM2 | 
| L 1,=ACfilename) [Loads address of DTF table. } 
| IL 10,=ACfldname) |Loads the field name specified by PARAML. | 
| | LR [Oor {Loads the register specified by PARAM]. 

| |BAL {0,*+6 [ | 
| |DC |}ALICPARAM]1) | Generated if PARAM] and PARAM2 are numbers. | 
| IDC {ALI CPARAM2) | | 
| IL 115,161) l}Loads address of logic module. | 
| IBAL 114,8¢€15) [Branch to read routine in logic module. | 
|READ macro expansion for the 3886 Optical Character Reader. | 


Function: The READ macro instruction causes part or all of the next 
sequential physical record (Cor the next logical block for control 
interval format)? to be read from the file associated with the filename 
into the area of storage indicated. If the file is on a 3886 Optical 
Character Reader, the storage area is indicated in the DTF. 


Procedure: The READ macro instruction must always be followed by 
either a CHECK macro C(MICR and work files) or a WAITF macro (DAM, 
ISAM, and 3886 files) to ensure the completion of the READ 
Instruction. 


The read logic sets up the channel program, modifies the CCh, 
inserts the address and number of bytes to be read, and issues an SVC 
0. For control interval format the READ may not cause physical I/0. 


The read logic does not provide for deblocking of records. If the 
user wishes to use blocked records, he must provide this function tn 
the problem program. 


RELEASE Macro -- Dynamic Device Release 


[Label | RELEASEISYSxxx,... | Jo 
ev lo,1,8AVE aves registers OQ and 1. 


| 
Is 
l1,=C'S$BRELSE' [Loads address of B-Transient name. | 
0, *+4+6 [Branches to fetch and skip table. | 
2 |Fetches $$BRELSE. | 
0,1,SAVE {Restores registers O and l. 

14 }Normal end of job. i 


Function: This macro releases a unit table as specified by the problem 
program and fetches $$BRELSE. 


The 'sSavearea’ parameter isS optional. If it is provided, it should 
be the name of an 8-byte area where registers O and 1 are saved for 
the user. If it is not provided, the contents of registers O and 1 
are destroyed. 

Procedure: The macro checks all of the units provided in the operand 
sublist to assure that no system logical units are requested for 
release. If system logical units are specified, an MNOTE is issSued 


and the unit 18S ignored. 


After all checking 1s done, a unit table is set up,» register O is 
loaded with the table address, and $SS$BRELSE is fetched. If the 
*savearea’t option 18S specified, registers O and 1 are saved,» and code 
is generated to restore them after the transient returns control to 


the RELEASE macro. 
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RELSE Macro 


3 


Label]RELSE [fil 
1 


Function: The RELSE (Crelease) macro instruction is used in conjunction 
with blocked input records. It allows the programmer to skip the 
remaining records in a block. If the record spans multiple physical 
blocks», the entire logical spanned record is bypassed. Processing 
continues with the first record of the next block when the next GET 
macro instruction is isSSUed. 


Procedure: The GET routine is modified to make the current record 

being processed look like the last record of the block. With this 
indication, the next GET transfers information from the input devi 
to main storage and makes the first record of the new block availa 
to the problem program. 


ce 
ble 
RESCN Macro 


Label]RESCN |[filename,ri,r# 


Function: The RESCN macro provides the capability of rereading a field 
that has a defective character. This macro pertains only to the 
document mode and rereads into the portion of IQOAREAIL corresponding to 
the original read. Online correction can also be forced by this 
macro. 


The macro requires from three to five parameters. The first 
parameter specifies the symbolic name of the 1287D file given in the 
DTFOR header entry for the file. The second parameter specifies a 
general purpose register (2-12) which must contain the address of the 
Load Format CCW giving the document coordinates for the field to be 
read. The third parameter specifies a general purpose register (2-12) 
that must contain the address of the Load Format CCW giving the 
coordinates of the reference mark. The fourth parameter specifies a 
number (€n), which is the number of retries to be given. The fifth 
Parameter specifies one more retry with forced online correction. 

ThisS parameter must be the letter F. 
d gical IOCS retries the 


Procedure: When a character cannot be re lo 
he character still cannot 
on 


ad» 

line containing the unread character. ET -t 
be read, the user is informed of the conditi in his error correction 
routine specified in the DTFOR COREXIT entry The user can then issue 
the RESCN macro to reread the field with the unreadable character. If 
the character still cannot be read, it is retried up to nine times 
depending on what the user specified. If the error still exists on 
a last retry, online correction is forced if the user specified 

is. 
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| ee aa canes {Loads address of DTF table. 

| }MVC f88(08,1),0Cr?) {Puts Load Format CCW for reference mark 

| } | oe DTF table. 

| }MVC 196€16,1),0¢€r!) Puts Load Format CCW for field to be read 
| | | fin DTF table. 

| IL 115,161) |Loads address of logic module. 

| [BAL 114,16¢€15) IBranch to RESCN routine in logic module. 
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SEOQV Macro 


[LabellSEOV lfilename | 
ira Ce SC ueeBGEOVA® | ads addreess of B-transient name. 


Lo 
IL 10,=ACfilename) |Saves filename for B-transient phase. 
ISsvc {2 |Fetches phase $$BCEOVI. 


aaa tees eo 


Function: The SEOV (System Units End-of-Volume) macro instruction 
allows automatic volume switching to occur if the reflective spot is 
pgeaeae on a magnetic tape output file assigned to either SYSLST or 


Procedure: An SEOV macro, issued after the physical end-of-volume has 

been detected on a tape file, fetches phase $S$BCEOV1 to determine the 

file type», and to select the proper tape close routine. The selected 

tape close routine performs the appropriate close functions and 

determines if an alternate tape is available. If an alternate tape is 

available, it is opened and made ready for processing. ) 


SETDEV Macro 


biabelISETDEV [filenames ohasenene | 
ff he =AC filename) ]Loads address of the DTF table. 


| | 
| | 
| |BAL }O0,*+12 {Generated if the phasename is an actual phasename. | 
| } DC |CL8*phasename'’ ; | 
{ | LR |O>r !If phasename is eecoee in a register (r) | 
| | I Jother than registe ; | 
| IL 115,161) [Loads address of logic module. — | 
| |BAL }14,16¢€15) IBranch to SETDEV routine in logic module, | 


Function: The SETDEV CSET DEVice) macro instruction loads a format 
record into the 3886 Optical Character Reader. 


Procedure: The SETDEV macro generates code which sets up parameters 
and branches to the 3886 logic module. The logic module gets the 
format record from the core image library and loads it into the 3886 
device control unit. 


SETFL Macro 


) |JLoads address of 
: ] 


table (DTFIS Load). i 
Loads address o rege eas name. | ) 
t 


Function: The SETFL (SET File Load mode) macro instruction sets up the 
ISAM file so that the load function can be performed. 

Procedure: The SETFL macro instruction preformats the last track index 
of each cylinder of a file with zero entries, and initializes for a 
WRITE. Control then returns to the problem program. 
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SETL Macro 


IJJS&SYSNDX|BAL 10,*+12 Branch to fetch Br-transient 
1\AC filename) Address of DTF table. 


DC ACPARAM(1)) Address of field containing s 
lowest) reference if PARAM=ID 

DC CL4’PARAM’ If PARAM = BOF, KEY, or GKEY. 

Svc 2 Fetches phase SSBSETL. 

IL 1,1TJIJS&SYSNDX+4 Loads address of DTF table. 


*Optional 


iates the mode 


Function: The SETL CSET Limits) macro instructi iti 
Is outines to begin 


for sequential retrieval and initializes the 
retrieval at a specified starting address. 


Procedure: If KEY is specified in the DTFIS table, the SETL routine 
Searches the indexes to find the track and record address of the keyed 
record. The GET/PUT constants are initialized to begin with the 
address of the keyed record. When BOF (beginning of the file) is 
specified, SETL initializes the GET/PUT logic to begin retrieval with 
the first record in the file. If ID is specified in the DTF, the 
GET/PUT logic is initialized to start with the record in the prime 
data area corresponding to the specified ID. 


TRUNC Macro 


Label|TRUNC |fil 
1 


| e | 
==" “| eae icrarorioade dncese ar Dit tskic.. 
| L ‘ ename)/{Loads address of DTF table. | 
| 2 ) 


|Loads address of logic module. 
1BAL IBranch to TRUNC routine in logic module. | 


Function: The TRUNC C(CTRUNCate) macro instruction is used with blocked 
output records. It allows the programmer to write a short block of 
records. (Blocks do not include padding.) Thus, the TRUNC macro is 
used for a function similar to the RELSE Crelease) instruction for 
input records, but in reverse. That its, when the end of a group of 
logical records is reached, that block is written and a new group is 
started at the beginning of a new block. 


Procedure: If (Cas a result of the previous PUT) the block has already 
been transferred to the output device, the TRUNC macro requires no 
additional handling. If physical I/O is needed, the PUT routine is 
modified to handle the truncated record. Control then returns to the 
problem program. 


WAITF Macro 


fetch IWAITF [filename?,filename?,...filenamen | 
| ST SYSLIST(n,1)>, |Stores end of list code, ntl, | 
| | IJJW&SYSNDX+n*4 in last entry in file list. 
| IL l1,=ACfilenamen) Loads address of DTF table. { 
| PL 115,16(€1) Loads address of logic module. | 
JIJIJWESYSNDX |BAL 114,4(€15) Branch to WAITF routine in | 
| | | logic module. | 
| }DC IACSYSLISTCn)) Address of file list. 

n = a maximum of 16 files can be specified in the macro operand. 


INTRODUCTION 31 


tarting (Cor 


name. * 
* 


Licensed Program - Property of IBM 


Function: The WAITF macro tests the condition of MICR device(s) and 
tests for I/0 complete when used with DAM or ISAM files. 


Procedure: For MICR files, if any one of the devices tested is 
operative and ready (that iS; has records or error conditions to be 
processed), control returns to the problem program at the next 
sequential instruction following the macro expansion. On the other 
hand, if all the devices tested are not operational (that is, they are 
oo veers for documents to process); the system enters the wait 
state. 


For DAM or ISAM files, the WAITF macro makes the system enter the 
wait state until a previously started I/O operation is complete. 


Note: Only that partition in which the device(s) tested is operating 


enters the wait state. This allows processing to continue in another 
partition. 


WRITE Macro 


[Label IWRITE*}] filename, TYPE,sPARAM | 
| i rar leneae) ILoads address of DTF table. } 
| IL }0,=ACPARAM) {Loads address of output area. | 
| IL 115,161) jLoads address of logic module. | 
| an fia, 52015) fac onch to WRITE routine in logic | 
| t jmodule if TYPE=SQ. x | 
| [ 


ne tn logic 


BAL 14,28,(15) Branch to WRITE rou L 
- 


t 
jmodule if TYPE=UPDAT 


* For RECFORM = FIXUNB. 
** Optional 


Function: The WRITE macro instruction writes a record from the 
Indicated area in main storage to the file associated with the file 
name. 


Procedure: The WRITE macro sets up the channel program, modifies the 
CCW command code to write, inserts the address and number of bytes to 
be written, and issues an SVC QO. For control interval format, 
Physical I/O may or may not occur. 


The write logic does nat provide for blocking of records. If the 
user wishes to block records, he must provide for it in the problem 
program. 


The WRITE macro instruction must always be followed by either a 
CHECK macro (work files) or a WAITF macro (DAM and ISAM files) to 
ensure the completion of the WRITE instructton before another 
instruction is issued. 
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File initialization and termination 
routines open files required by the problem 
Programmer, and close the files when they 
are no longer needed. These routines, 
called into the B-transient (Clogical 
transient) area by the corresponding OPEN 
and CLOSE macros,» consist of: 


Ls TES Processor (SSBOESTV). 


2. Open Monitor CS$BOPEN, $$BOP 
SSBOPEN2» SSBOPEN4&, and $S$BOQ 

$B 

BC 


3. Close Monitor ($$BCLOSE, § 
SSBCLOS4, SSBCLRPS, and $$ 


G4. EQF/EOV Monitor CS$SBCEOV1). 


in 


Device or file-processing method 
oriented open and close transients. 


OPEN ROUTINES CHARTS 01-04 

The open routine opens each file needed in 
the problem program. Up to 16 files can be 
opened with each OPEN macro instruction by 
entering their filenames asS parameters. 


To open a particular file, the Open 
Monitor (Chart O2) examines the DTF table 
specified by the filename to determine the 
file type and/or the ftle processing 
method. This information is obtained from 
byte 20 cf the DTF table. Figure 2 on 
Page 6 summarizes these DTF type codes. In 
addition, the Open MNonitor performs some 
inttialization and checking, and reads any 
necessary label information into main 
storage. The Open Monitor then calls the 
appropriate open transient(s) to handle the 
file open. 


Unit Record and 3881 Optical Mark Reader 
Files 


When opening unit record devices (readers, 
punches, consoles printers, paper tapes, 
and the 3881 Optical Mark Reader), the Open 
Monitor calls $$BOQUR01 to determine if the 
device is in the eady condition. If 
device 18S ready, he open indicator tn the 

o ail (bit O of byte 21) 
le is open. 


DIF table is set 
to indicate the fi 


The Open Monitor calls $$BOMRCE if the 
coy eee a 3505 with OMR and RCE or a 3525 
wi : 


Magnetic Ink Character Recognition Files 


When opening MICR type devices CIBM 1255, 
1259, 1270, 1275, and 1419), the Qpen 
Monitor calls $S$BOMRO1, which clears the 
document buffer area and initializes the 
document buffer pointer within the DTF. 


The address of the DTF is inserted into the 
correct entry of the supervisor PDTABB 
table. The unit exception bit in the CCB 
is turned on, and the device address is 
calculated and moved into the DTF. The 
OPEN indicator in the DTF table is set to 
indicate that the file is open. 


Optical Reader Files CExcept 3881) 


When opening the IBM 1287 Optical Reader, 
the Open Monitor calls $$BOQRO1, which 
determines if the device is ready, and if 
so, further determines if a header is to be 
read (HEADER=YES specified in the DTF). If 
it is, the open routine waits for the 
operator to manually key itn a header. When 
the header has been read, the OPEN 
indicator in the DTF table is set to 1 to 
indicate that the file is open. 


When opening the 3886 Optical Character 
Reader file, the Open Monitor calls 
SSBOORO1, which determines if the device is 
ready and if so, loads a format record from 
disk into the format area of the DTF. If 
the length of the format record is found to 
be within the required limits, it is loaded 
into the 3886 control unit. If no errors 
occur on the load, the open bit in the DTF 
is set on and control is returned to the 
Qpen Monitor. If the format record length 
is incorrect or if an error occurs on the 
load, the open routine is canceled by an 
illegal SVC. 


Magnetic Tape Files (DTFMT, DTFPH-MT) 


When opening magnetic tape files, the Open 
Monitor calls $$BOTSVA to link to the 
SIJJTTOP SVA phase to complete the OPEN 
processing. 


DASD Files 


When opening DASD files, the Open Monitor 
checks the label information to determine 
the type of processing used for the file: 
SAM, DAM, ISAM, or VSAM. The monitor then 
calls the appropriate transient to complete 
the open. If an ISAM DTF is linked with a 
VSAM file, IIPOPEN is called. 


Diskette Files 


When opening diskette files, the Open 
Monitor checks the DTF type code (byte 20 
of the DTF table) and the device code (byte 
29 of the DTF table) to determine if the 
Diskette Input/Output Unit transients are 
needed. The monitor then fetches the 
appropriate transient to complete the open 
(see Charts O7 and G8). 


CLOSE ROUTINES CHARTS O5, G6 

The close routine closes any file that was 
Previously opened in the system. Up to i6 
files can be closed by each CLOSE macro 
instruction by entertng their filenames as 
parameters. 
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Unit Record Files (Except MICR) 


For unit record devices, the Close Monitor 
sets the close indicator in the DTF table 
(bit 0 of byte 21) to a O to indicate that 
the file is closed. 


MICR (Magnetic Ink Character Recognition) 
Files 


For MICR type files, the Close Monitor 
calls $$BCMRO1 to complete the close 
function. 


Magnetic Tape Files (DTFMT, DTFPH-MT) 


For magnetic tape files, the CLOSE Monitor 
calls S$BOTSVA to link to the $IJJTTOP SVA 
Phase to complete the CLOSE processing. 


DASD Files 

For DASD files processed by SAM the Close 
Monitor calls $$BOSFBL to link to the 
SIJJGTOP SVA phase to complete the close 
function. or DASD files processed by 
ISAM, the Close Monitor calls SSBCISOA to 
update and rewrite the format-l and 
format-2 standard file labels, and to set 
the close indicator in the DTF table. If 
an ISAM DTF is linked with a VSAM file, 
ISCCLOSE is called. For DASD files 
processed by DAM, $$BCLRPS is called to 
free storage that was obtained for the DTF 


extension. 


Diskette Files 


For Diskette Input/Ou 
Close Monitor calls § 
the close function. 


files, the 
o complete 


o> et 
cet 


FILE LABELING 


VSE/Advanced Functions can identify and 
protect DASD, diskette, and magnetic tape 
files by recording labels on each volume 
(DASD pack, diskette, or magnetic tape 
reel). These labels ensure that the 
correct volume is used for input and that 
no current information is destroyed when a 
volume is used for output. 


DASD, diskette, and magnetic tape files 
processed by logical IOCS must conform to 
certain standards regarding the use of 
labels. Although it is possible to process 
files with physical IOCS macros such as 
EXCP and WAIT, without processing labels, 
any file processed this way that is defined 
by a DTFPH macro must also conform to the 
Same label standards established for files 
processed by logical I0OCS. 


The standard label set processed by 
logical IOCS includes one volume label for 
each volume, and one or more file labels 
for each logical file contained within the 
volume. Optional user labels can be 
included in the label set but these must be 
processed by an independent user routine. 
CLogical IOCS routines pass control to the 
user's label routine in the problem program 


if the LABADDR= parameter is specified in 
the file definition, DTF, macro.) 
Additional volume and file labels can also 
be included in the label set but these 
labels can only be processed by the user, 
and only if nonstandard labels are 
specified in the file definition macro. 


User labels are not supported for 
diskette files. 


LABEL PROCESSING 


Creation of Tape Volume Labels 


The IBM or American National Standards 
Institute, Inc. standard volume label 1, 
and any additional EBCDIC volume labels, 
are written by an IBM-Supplied utility 
Program at the time a reel iS prepared for 
use. The information in the standard 
volume label is checked, but never altered, 
during file processing. Logical I0CS 
bypasses all additional volume labels when 
building output files. 


Standard Tape File Labels 


Standard file labels are written before and 
after every logical file on a reel. These 
labels are referred to as file header 
labels or file trailer labels, depending on 
their position and uSe. They are always 8&0 
bytes long and always have the same format 
and content, with the following exceptions: 


Lie The label identifier field (bytes 1-3) 
contains: 


a. HDR to indicate a header label 
(precedes the data file). 


b. EOV to indicate an End-of-Volume 
Cend of reel) trailer label 
Cwritten at the end of a reel, 
indicating that the file is 
continued on another reel). 


Cy EOF to indicate an End-of-File 
trailer label (written at the end 
of the logical file). 


2% The block count field is used only in 
the EOF and EQV trailer labels. This 
field is set to zero in the HDR label. 


Additional File Labels on Tape 


Each standard file label Cone header and 
one trailer) can be followed by up to seven 
additional file labels for EBCDIC tape 
files, or by up to eight additional file 
labels for ASCII tape files. The labels 
are 80 bytes long and must contain the 
label identifier HDR, EOV, or EQF in the 
first three bytes. The fourth byte should 
contain a character 2, 35..-n» indicating 
the second, third,... and up to the last 
file label. These labels are not processed 
by LIocs. If required, these labels must 
be written in the user's LABADDR routine by 
use of physical I/O macro instructions. 


34 IBM VSE/Adv. Functions Diag. Ref. LIOCS Volume 1 


Licensed Program ~ Property of IBM 


LIOCS bypasses additional header labels on 
input files. For ASCII ouput files a 
HDR2,EOF2 or EOV2 label is written by LIQCS 
following the HDR1, EOF1 or EOVi label. 


User Header and Trailer Labels on Tape 


The user can include additional header and 
trailer labels to further define his file, 
if he desires. Each additional label in 
the set is &0 characters long. EBCDIC 
label identifiers are numbered from UHL1 
and UTL1 through UHL8 and UTL8> maximun, 
for user header and trailer labels, 
respectively. American National Standards 
Institute, Inc.» user header and trailer 
labels are identified by UHLa and UTLa, 
respectively, wherein "a™ represents the 
range 2/0 through 5/14 except 2/7 
(quotation mark). The remaining 76 
characters can contain any information and 
arrangement desired by the user. 


Tapemarks with Standard Tape Labels 


The sequence of items on the tape that uses 
standard label sets is: 


: ae Se ouaen preceding the header label 
se 


Cs Header label set: 
Standard volume label (required). 


om Additional volume labels (0-7, 
optional: EBCDIC only). 


(egr Additional user volume labels (0-9, 
optional: American National 
Standards Institute, Inc., only}. 


d. Standard file header label 
(required). 


e. Additional file labels (Q-7, 
EBCDIC: 0-8, American National 
Standards Institute, Inc., 
optional). 


f. User header labels (0-8, EBCDIC: 
or range 2/0-5/14% except 2/7, 
American National Standards 
Institute, Inc., optional). 


5% Tapemark between header label set and 
first data record. 


G. Physical data records for file. 


Tapemark between last data record and 
trailer label set. 


6. Trailer label set: 


a. Standard file trailer label 
Crequired at end-of-file and 
end-of-volume). 


b. Additional file labels (0-7; 
EBCDIC: 0-8, American National 
Standards Institute, Inc., 
optional). 


om User trailer labels (0- ye EBCDIC: 
range 2/0-5/14 except 2/7 


Cquotation mark), American National 
Standards Institute, Inc., 
optional). 


Tapemark after trailer label set. 


8. If multifile reel (CEOF label), nexe 
standard file header label follow 
here. If single-file reel (CEOF label) 
or if last file of a multifile reel, 
another tapemark follows here. I f 
multireel file CEOV label)», one 
tapemark follows the EQV label on an 

EBCDIC file. Two tapemarks follow the 

EOV label ona multireel ASCII file. 


Standard Tape Label Processing 


Standard tape label processing is performed 
by the LIOCS transient label-processing 
(Open, Close, EOF/EQV) routines. These 
routines use the information supplied in 
the job control card (/7/ TLBL) that was 
stored in the label information area. 


The actual label processing consists of the 
following checks: 


Tape Input File: 


° The volume serial number in the standard 
volume label on the first or only reel 
is compared to the file serial number in 
the TLBL card. All other volume labels 
on all reels of the file are bypassed. 


° The contents of the TLBL card are 
compared to the corresponding fields in 
the standard file neader label on the 
first reel. Fields 1-10 are required. 
Fields 11-14 are optional. For 
Successive reels of a multireel file, 
the volume sequence number (CEBCDIC file) 
or file section number (CASCII file) is 
increased by 1 for each reel. 


° If user labels are indicated, they are 
read into main storage by the open 
routine for processing by the user's 
label routines. The user labels are 
read one at a time, until all have been 
processed. 


e When a standard file trailer label is 
read, the block count is compared to a 
count accumulated by I0OCS 


e If user trailer labels are indicated, 
they are read into main storage by the 
close routine for processing by the 
user's label routine. The user trailer 
labels are read one at a time until all 
have been processed. 


Tape Output File: 


e The volume serial number in the standard 
volume label on the first or only reel 
is compared to the file serial number in 
the // TLBL card. All other volume 
labels on all reels are bypassed. 


e The expiration date in the standard file 
header label is checked against the 
today's date in the communications 
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region. If the expiration date has 
passed, the reel is backspaced to write 
the new standard file label. If not, 
the operator is notified of the 
condition. This check is performed on 
each reel of a multireel output file. 
If no file label is present, the tape 
considered expired. For an expired 
9-track tape, the user-specified density 
is compared to the VOLI1 density of the 
mounted tape. If a discrepancy is 
found, and if the tape is at load point, 
the volume label(s) is rewritten 
according to the user-specified density. 


The new standard file label 


is 


j 
with the information supplied ji the // 
TLBL card. For multireel files, the 
volume sequence number CEBCDIC file) or 
file section number (CASCII file) is 
increased by 1 for each successive reel. 


If user header labels are indicated, 
user's label routine is entered to 
furnish the labels as each reel is 
opened. This can be done for as many as 
eight user header labels per EBCDIC file 
and for an unlimited number of user 
header labels per ASCII file. 


If end of reel is sensed before 
completing the file, an EOQV trailer 
label is written with all fields 
presented i the // TLBL card plus a 


block count. 


When end of file is reached, an EOF 
trailer label 15 written identical to 
the EOV label previously mentioned. 


If user trailer labels are indicated; 
the user's label routine is entered to 
furnish the labels after each trailer 
CEOV or EOF) label is written. This can 
be done for as many as eight user 
trailer labels for EBCDIC files and an 
unlimited number of trailer labels for 
ASCII labels. 


Nonstandard Tape Labels 


Any tape labels that do not conform to the 
standard label specifications are 


considered nonstandard. 
are not supported 
nonstandard labels are to be read, 


or 
On 
or 
The 


dos 


For 


Nonstandard labels 
in ASCII files. 

checked, 
written, it must be done by the user. 
input files, the nonstandard labels may 
may not be followed by a tapemark. 
refore, four conditions are possible: 


Nonstandard label(€s), followed by a 
tapemark, to be checked. 


Nonstandard label(s), not followed by a 
tapemark, to be checked. 


Nonstandard label(s), followed by a 
tapemark, not to be checked. 


Nonstandard label(s), not followed by a 
tapemark, not to be checked. 


conditions 1 and 2, the DTFMT or DTFSR 


entries must specify nonstandard labels and 
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the address of a user-written routine to do 
the reading or writing. 


For condition 3, nonstandard labels must 
be specified, but the address of a _ user 
routine is omitted. I0cS skips all labels, 
passes the tapemark, and positions the tape 
at the first data record to be read. 


For condition 4, nonstandard labels and 
a user address are specified. IOCS cannot 
distinguish labels from data records 
because there is no tapemark to indicate 
the end of the labels. Therefore, to 
Position the tape at the first data record, 
the user must read all labels. 


With nonstandard labels when an 
end-of-file or an end-of~-volume conditio 
exists, the user indicates to IOCS which 
condition it is. On end-of-file, IQC 
branches to the user's end-of-file ad 
On end-of-volume, IOCS initiates the 
end-of-volume procedures to close the 
completed volume and open the next volume 
for processing. 


On output files, nonstandard labels are 
written by the user's routine by using 
Physical IOCS. The OPEN routine writes a 
tapemark between the user's nonstandard 


header labels and his first data record 
unless the DTF macro instruction has the 
entry: TPMARK=NO. The close routine 
writes a tapemark after the user's last 
data record before he writes his 
nonstandard trailer labels, and after the 
trailer labels. 


Unlabeled Tape Files 


The DTF macro instruction speciftes whether 
the first record of an unlabeled file is a 
tapemark. 


Unlabeled IBM EBCDIC input tape files 
may or may not have a tapemark as the first 
record. CIf the first record is not a 
tapemark, IOCS assumes it iS a data 
record.) Any tape that is to be read 
backward may have a tapemark as the first 
record on tape. Unlabeled output tape 
files (written by IOCS) may be written with 
a tapemark as the first record. ASCII 
unlabeled tapes do not contain leading 
tapemarks. A read backward operation is 
performed to load point for these files by 
Special error recovery procedures. 


Note:;Seven-track tapes may be read 
backward only if they were written jin 
EBCDIC, and they must not have been written 
in the conversion mode. 


When an unlabeled output file is 
specified, the open routine assumes the 
mounted scratch tape is also unlabeled. 
checking of expiration date is performed. 


Therefore any existin labels including 
the volume label, are qecteaved. 


DASD Label Processing 
When a DASD file is processed by logical 


IocS, the file must be opened before any 
transfer of data can be made. The open 


No 
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routines check the DASD labels identifying 
the file. The open routines also compare 
information from the actual file labels in 
the VTOC against the label information 
supplied by the user in job control cards, 
and stored in the label information area by 
job control. 


Note: References made in this manual to the 
//7 DLBL and 7/7 EXTENT job control 
statements also apply to the // VOL, // 
DLAB, and //7 XTENT statements for the 2311, 
and 231472319. 


The DTFSD and DTFSR routines process the 
labels of a sequential file Cinput or 
output) one volume at a time. For DTFSR, 
as each extent is checked, IOCS can pass 
control to a user's extent exit routine. 
When the end of the last extent on a volume 
is reached, an automatic open is issued for 


the next volume. The DTFDA and DTFIS 
routines require that all volumes be online 
for the initial OPEN. DTFPH can be used to 
process SAM or DAM files. The actual label 
processing consists of the following 


operations: 
DASD Input Files: 


umbers in the volume 
to the volume serial 
EXTENT cards. 


° The volume serial n 
labels are compared 
numbers in the DLBL/ 


e The file identification, format 
identifier, and the file serial number 
in the format-I1 label are compared to 
the corresponding fields in the DLBL 
card. The volume sequence number, the 
creation and expiration dates are then 
checked against their EBCDIC equivalents 
in the DLBL card. 


Ad Each of the extent definitions in the 
format-1l and format-3 labels is checked 
against the limit fields supplied in th 
EXTENT cards. 


e 


° If user header labels are indicated 
(when DTFSD, DTFSR, DTFPH, or DTFDA are 
used), they are read as each volume is 
opened. After reading each label, the 
open routine branches to the user's 
label routine to perform any processing 
necesSary. 


e If user tratler labels are indicated 
(when DTFSD or DTFSR are used), they are 
read after reaching the end of the last 
extent on each volume or an end-of-file 
read by logical [O0CS. As with the user 
header labels, the trailer labels are 
processed by the user's routine. 


DASD Output Files: 


e The volume serial numbers in the volume 
labels are compared to the volume serial 
numbers in the DLBL/EXTENT cards. 

° The extent definitions in all labels in 
the VTOC are checked to determine 
Whether any extend into those defined in 
the EXTENT cards. If any do overlap, 
the expiration date is checked against 


the current date in the communication 
region. If the expiration date has 


passed, the old labels are deleted. If 
not, the operator is notified of the 
condition. 


° The file names of all entries in the 
VTOC are compared with the filename in 
the DLBL statement. If a match is found 
with an expired file, the expired file 
is deleted. If a match is found with an 
unexpired file, the operator is 


notified. 

° The new format-1 label is written with 
information supplied in the DLBL card. 
If an indexed sequential file is being 
processed, the DTFIS table supplies 
information for the format-2 label. 

° The information in the EXTENT cards is 
placed in the format-l labels, and (Cif 
necessary) additional format-3 labels. 

° If user header labels are indicated 
(when DTFSD, DTFSR, DTFPH, or DTFDA are 
used), the user's label routine is 
entered to furnish the labels as each 
volume 1S opened. This can be done for 


aS many as eight header labels per 
volume. As each label is presented, 
IOCS writes it out on the first track of 
the first extent of the volume. 


° If user trailer labels are indicated 
(when DTFSD or DTFSR are used), the 
user‘s label routine is entered to 
furnish the labels when the end of the 
last extent on each volume is reached. 
This can be done for as many as eight 
user trailer labels. As each label is 
presented, IOCS writes it out on the 
first track of the first extent of the 
volume. The CLOSE macro instruction 
must be issued to create trailer labels 
for the last volume of a file. 


Diskette Label Processing 


When a diskette file is processed by 
logical IOCS, the file must be opened 
before any transfer of data can be made. 
The open routines check the diskette labels 
(which identify the file) against the label 
information supplied by the user in the 
control cards (stored in the label 
information area by job control). 


A diskette file can be identified by two 
job control statements: 4/7 DLBL and 
77 EXTENT. When the extent limits ona 
volume are exhausted, an automatic open is 
1ssued for the next volume (Cfor DTFDU and 
DTFPH). DTFPH can be used to process 
diskette files, feed the diskettes out for 
a multivolume file» and issue an open to 
get the new extent limits for the new 
diskette (both for input and for output). 


Diskette Input Files 

e The volume serial numbers in the labels 
are compared to the serial numbers in 
the DLBL/ZEXTENT cards. 


e If ‘file ID’ is supplied on the DLBL 
card, then that file on the diskette jis 
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processed (Cif found). If ‘file ID’ is 
omitted, the DTF name is used. 


Both volume and file security label 
fields are examined and handled to 
ensure data integrity. 


All symbolic units specified in the 
EXTENT cards are checked to ensure that 
only one physical unit is being 
addressed. This is necessary to ensure 
that only one file is open on a 
diskette. 


The extent limits in the file label are 
checked for validity; if they are found 
to be correct, the DTF is initialized. 


For multivolume diskette input files 
using DTFDU, the extent cards and the 
multivolume indicator are used in 
conjunction by the OPEN transients to 
determine when end-of-file has occurred. 
If three extents were provided by the 
user, the following multivolume 
indicator combination could occurs: 
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1Action by OPEN Transients 


ultivolume 
ndicator 


issue warning message. | 
{No volumes are processed; 


lissue permanent error 
Imessage. 


anything 


!Process first volume and | 
lissue permanent error | 
|Imessage. 


x 1Process first volume and 
lissue permanent error 
|Imessage because file not 
| found. 


L, anything|Process through the 'L' | 
and issue warning 
esas | 

C, Cc 1Process through the 

Inumber of extents. 

]No message. 

1Process through the ‘'L*'. | 

JNo message. 
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for DTFDU the number of 


diskettes can be less than the number of 


extents provided. 
DTF‘s, 
number of extents 
of the DTF type, 


For all other supported 
processing continues until the 

is exhausted. Regardless 
for system files 


processing continues until all extents are 
exhausted. 


Diskette Output Files 


The volume serial numbers in the labels 
are compared to the serial numbers in 
the DLBL/ZEXTENT cards. 


If ‘file ID‘ is supplied on the DLBL 
card, it will become the name of the new 
file on the diskette. If "file ID" is 
omitted, the DTF name is used. 


e 
Extent limits are determined by OPEN; 
any expired files that are overlapped by 
the file to be created are deleted. The 
operator is informed of any overlap with 
an unexpired file. 


All file names are compared with the 

name of the file to we created. If a 

match is found with an expired file, 

file is deleted. Tne operator is 

po eonee of a matcn with an unexpired 
ile 


The new HDR1 
written back 


the 


label is created and 
out onto the diskette. 


If a secured file 
volume label is updated to 
secured volume. 


A CLOSE macro instruction must be issued 
to ensure that all records are written 
and to update the HDR1 label for the 
last volume of the file. 


is being created, the 
indicate a 
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COMMON AND SPECIAL PURPOSE LOGICAL I0CS 
ROUTINES 


This section contains detailed descriptions 
of certain routines generic to logical 
Iocs. In general, these routines cannot be 
related to a specific file type or file 
Processing method. Describing LIOCS in 
four volumes has made it necessary to 
include details of these routines in Volume 
l even though they may relate to file 
processing described in other volumes. 


Included in this section are: 
¢ TES Processor (S$$BOESTV) 


¢ Op poo oe (SSBOPEN, $$ 


en BOPENI, 
S$$BOPEN2 SBOPENS, and $$BOPLBL) 

e Close Monitor (S$BCLOSE, $$BCLOS2, 
$S$BCLOS4, $S$$BCLLBL, and $$BCLRPS) 

e Open for self-relocating programs 
(S$S$BOPENR, and $$BOPNR2, and $$BOPNR3) 

e RPS SVA initialization routine 
($S$BOPENS) and RPS phase loading routine 
(S$SVOPENT). 

e DASD File Protect and VTOC Display and 


Dump routines. 


¢ DASD RPS Common Close CS$BCLRPS) 

e Check Duplicate Device Assignments for 
Logical Units ($$BOPENC) 

« Enqueue and Dequeue for VSE/VSAM 


Routines ($S$BENDQB) 
e SD Close Input and Output (CS$BOSDC1) 
¢e Close, Free Track Function ($$BOSDC2) 
¢ Forced End of Volume for Disk ($$BOSDEV) 


e Remove Extents from Extent Block 
(S$S$BODQUE) 


e Device Release ($SBRELSE) 


S$S$BOESTV: 


Objective: For tape, record TES information 
from the PUB2 table onto SYSREC as 
applicable, post the new tape open, and 
Pass control to the next transient. 


Error Statistics by Tape Volume 


1. From S$$BOPENI1 or S$BPCPO1 when tape 
unit ready. 


2. From S$$BOPEN for job control tape OPEN. 


3. From a message writer routine to post 
OPEN and process new volume label 


Exit:;To next transient. 


Method: S$SBOESTV tests the device type of 
the device to be opened. It does the 
following: 

Ls The tape label ead and compared 

i ently stored in the 
device. 


v 

Cc 

wo 
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i) 
7D cto 
oo wen 

un 
tet tt 


o the appropriate 


2. Control is pass r 
ape was previously 


opened. 

3. The tape open bit is posted, the volume 
serial number in the PUB2 table is 
Saved, and control is passed to the 
appropriate exit phase if this is the 


first tape on the device. 


Gq. The tape open bit is posted and control 
is passed to the appropriate exit 
routine if the tape is unlabeled, there 
is no volume ID in the PUB2 table (the 
previous tape was also unlabeled), and 
individual recording was not specified. 


5. The TES record is written onto SYSREC, 
the tape open bit is posted, and 
control is passed to the appropriate 
exit phase if the tape is unlabeled and 
either individual recording was 
specified or the previous tape was 
labeled. 


6. The TES record is written onto SYSREC, 
the tape open bit is posted, the new 
volume ID is stored in the PUB2 table, 
and the appropriate phase is fetched if 
the tape label read is different from 
the label in the PUB2 table. 


SSBOPEN: 
Objective: 


Open Monitor 


Ls Initialization of the Logical 
Transients Common Area and the Fetch 
RPS Initialization Routine. 
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es Tape Error Recording Routine for Job 
Control open. 


Entry: 


1. From an OPEN macro expansion in the 
problem program. 


2. From_a successfully completed open 
routine. 


S% From the SSBOPENR or S$SS$BOPNR2, DTF 
relocation routines. 


G. From a message writer routine. 


5 From the open routine for DTFCP or 
DTFDI files. 


Exits: To $$BOPENI1, $SBOESTV;, and $$SBOPENS. 
Method: 


i If RPS is not yet initialized, $$BOPENS 
is fetched to do so. 


Zs SSBOPEN tests the device type of the 
device to be opened. If the device is 
a tape, the logical transients common 
area 1s initialized for tape open. If 
SSBOPEN was fetched by job control, an 
exit is taken to $$SBOESTV to do 
recording. If the open 1s not for job 
control, S$BOPENI1 is fetched. If the 
device is not a tape, initialization of 
the logical transients common area 
takes place and $$BOPENI1 is fetched. 


$$BOPEN1: 


Objective: To determine, initialize for, 

and fetch the proper open routine for DASD, 

diskette, magnetic ink character 

recognition (MICR);, magnetic tape, optical 

aoe unit record, and telecommunications 
iles. 


Open Monitor Phase Il 


Entry: From $$BOPEN, or return from another 
logical transient. 


Exits: 

° Sager for DTF type code X’'20° and 

e To $$BOPLBL, and then to $$BOPEN2 for 
ISAM files. 

e To $$B35400 for diskette files. 


¢* To an appropriate open routine if other 
files are to be opened. 


° To a message writer routine if an error 
has occurred. 


° To the problem program if no more files 
are to be opened. 


° To $$BOCPO01 for DTFCP printer files. 
e To $$BOURO1 for DTFPR/DI printer files. 


Method: The $$BOPENI] phase begins the 
initialization of the open table located at 
the end of the logical transient area. The 
open table is initialized for all file 
types and passes information to the 
Successive open phases. Next, the type of 
entry into the $$BOPENI] phase is 
determined. If entry was made directly 
from an OPEN macro, the monitor prepares to 
open the first file specified in the macro 
operand. If access control is in the 
system, the monitor links first to the 
access control module residing in the SVA. 
If entry was made from another open phase, 
the monitor prepares to open the next file 
specified in the macro operand. If entry 
to the $$BOPENI1 phase was from a message 
writer phase or from a device independent 
file (CP or DI) open phase, processing 
continues on the current file. At this 
point $$BOPEN1 checks whether the control 
block is a DTF or a VSAM ACB by testing the 
type code (byte 20 of the control block). 
If the code is X'28', the file being opened 
is a VSAM file with an ACB control block. 
In this case, phase $SBOVSAM is called. If 
the code is anything other than X’°'28', 
X'*20", X'21", X’22', and X'23'"', $SBOPENI] 
loads and branches to $$BOPIGN. 


When S$$BOPIGN returns control, S$BOPENI1 
determines the type of file being opened 
from byte 20 of the DTF table. If an 
invalid file type is detected, message 
4880I is printed and the job is canceled. 
The file type governs the functions that 
the open monitor must perform to open a 
particular file: 


Oo 


e Console (DTFCN) files are ignored. 


° Unit record (DTFCD, DTFPR, and DTFPT); 
optical reader (DTFOR), magnetic ink 
character recognition (DTFMR), compiler 
(DTFCP), and basic telecommunication 
access method —- extended support 
C(BTAM-ES) files are checked to validate 
the address limits of the respective DTF 
tables and the proper open phase 15s 
fetched. 


For all DTFMT and DTFPH-MT files, $$BOPENI 
fetches the SVA link phase $S$BOTSVA to link 
to the S$IJJTTOP SVA phase to complete the 
OPEN processing. 

For DAM and sequential DASD files defined 
by DTFCP, DTFDA, DTFDI and DTFSD $$BOPENI1 
fetches the SVA link phase S$SBOSFBL to link 
the SIJJGTOP SVA phase to complete the OPEN 


processing. 


For diskette files, S$SBOPEN1 prepares to 
read sequential DASD labels from the label 
area into the logical transient area and 
fetches diskette open phase $$B35400. 


S$SBOPENG: 
Phase 


DASD DTF DEV Type Update OPEN 


Objective: 


diss To locate the PUB for the DASD, using 
the corresponding LUB pointer. 


2. To test the PUB to make sure it is used 
for a 3340. 
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3. To check the VOL ID to make sure that 
the corresponding 3340 is ready and the 
VOL ID is correct. 


Entry: From $S$BOPLBL and reentry from 
SSBOMSGI1. 


Exits: To $$BOPEN2 to continue OPEN 
processing for ISAM or to $$BOMSGI1 for 
operator communication. 


Method:;The logical unit address in the 
first type-1 label extent information of an 
ISAM file defines the correct size for all 
3340 data modules containing prime data 
and/or overflow areas cf an ISAM 
multivolume file. The logical unit address 
of the first Cor only) type~-4 label extent 
information defines the size of the 3340 
data module containing the index area(s). 


S$$BOPIGN: 


Objective: To check for the COBOL open 
ignore option. 


Entry: From $$SBOPENI1. 


Open Ignore 


Exits: 
¢ To $$BOPEN1 to continue opening the 
files. 


e To $$BOMSG1 if an error occurs. 


Method: dit nd corer elves. 11 vie eoeor 
open ignore option is specifie or e 
file by testing bit 2 in byte 16 of the DTF 
table. If the bit 1S on, a second test 
determines if the file_is either unassigned 
or assigned ignored. If this is the case, 
the open for the file is bypassed, and 
control returns to $$BOPEN1 to open the 
next file. In all other cases, $$BOPIGN 
validates the address limits of the DTF 
table, and returns to $$BQOPENI1 which 
continues opening the file. 


SSBOPEN2: Open Monitor, Phase 2 


Objective: To read label information from 
the label area for ISAM files, and to fetch 
the eres open phase for the file being 
opened. 


Entry: From $$BOPLBL, $$SBOPEN 
message writer phase (S$SBOMSG 


Exits: 


G4, or from a 
1). 


¢ To the required open phase determined by 
SS$BOPENI. 


° To $S$BOMSG1 if an error is detected. 


¢ To phase IIPOPEN if an ISAM DTF is 
linked with a VSAM file. 


¢ To phase $$BOCISC if CDLOAD for IIPOPEN 
Was not successful. 


Method: This phase of the Open Monitor 
reads the label information (stored by Job 
Control on the label area) into the area 
obtained by $SBOPLBL through a GETVIS 


macro. 


For ISAM files, $S$BOPEN2 of the Open 
Monitor reads a single DLBL/EXTENT record. 
This record can contain more than one 
EXTENT card image. The DLBL label tyre 
indicator is checked. If it contains 'V’, 
the file is a VSAM file. In this case the 


open-active indicator is reset and phase 
IIPOPEN is loaded using the CDLOAD 
function. IIPOPEN is part of the ISAM 
interface program, IIP. The user return 
address is stored from the user save area 
into the DTF. The file list pointer is 
stored into register OQ of the usSer’s sa 
area, control is given to IIPOGPEN, and 
B-transient area 1s released. If the D 
label type indicator contains ‘"C* or ‘°F 
indicating an ISAM file, the file type 
checked against the DTF type. Then the 
DASD address limits of each extent are 
checked. Any extent errors cancel the job. 
When checking of the extent address limits 
is complete, $$BOPEN2 fetches the 
appropriate open phase determined by 
S$$BOPENL. 


—) «<™rre< 


SSBOPLBL: 
Processor 


Open Monitor Label Space 


Objective: To determine the size of the 
read-in area required to process the 
DLBL/ZEXTENT information and to issue a 
GETVIS for the required space 


Entry: From $$BOPEN1. 
Exit: 
¢ To $$SBOPENG for ISAM. 


« To $$BOMSGI1 if an error occurs. 


Method: S$S$BOPLBL, at open time, builds a 
Parameter list and calls Symbolic Label 
Access to determine the amount of 
DLBLYZEXTENT information to be processed. 

If the space obtained by a previous OGPEN or 
CLOSE in this job step is not sufficient to 
meet the label processing requirements, a 
FREEVIS macro is issued to release this 
space and a GETVIS macro is issued to 
obtain the required space. Pointers and 
channel programs are then updated and an 
exit is taken to the next phase. 


SSBOPENR: 
Objective: To relocate all DTF address 
constants from the assembled address into 


executable main storage addresses. 


Entry: From the GPENR macro to the label 
START. 


Exits: 
e To $$BOPNR3. 


Relocate DTF Address Constants 
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° To the Gpen Monitor, $$BOPEN, when the 


last DTF table is processed. 


Method: The S$BOPENR routine first 
determines if modification (€relocation) of 
the DTF address constants iS necessary by 
Subtracting the assembled DTF table address 
from the relocated DTF table address. The 
relocation factor in register RELOCREG is 
the result of this operation. If the 
relocation factor is 0, no relocation is 
necessary. 


If relocation is required and if the DTF 
has not already been relocated, the 
relocation indicator in the DTF is turned 
on. The CCW address in the CCB and the 
logic module address in the common portion 
of the DTF are then modified. If the 
required relocation was accomplished by a 
previous opening of the file, the entire 
Cer routine is bypassed for the 

ile. 


Following the modification of addresses 
in the common portion of the DTF, the 
individual DTF type is determined and the 
address of the corresponding address 
modification table is obtained. When the 
remaining addresses in the DTF have been 
modified, a branch iS made to the ending 
routine. 


The ending routine determines the next 
operation. If there are more DTFs to be 
processed, a branch is made to the 
beginning of the relocation routine to 
repeat the procedure for the next DTF. If 
the last DTF has been relocated, the Open 
Monitor, SS$BOPEN, is fetched. 


SSBOPENC: Check Duplicate Device 
Assignments for Logical Units 


Objective: To determine if a physical 
device is assigned to more than one of the 
logical units specified in the operand of 
the OPENC macro. 


Entry: From an OPENC macro expansion to the 
label OPENCNAM. 


Exits: To the problem program if no error 
is detected, or to CANCEL if a physical 

cone oa is assigned to more than one logical 
unit. 


Method: The $$BOGPENC phase begins by 
building a table, called the OPENC table, 
containing the 2-byte LUB entry for each 
logical unit specified in the OPENC macro 
operand. Because the first byte of a LUB 
entry contains a pointer to a specific PUB 
(physical device), the byte can be compared 
to the corresponding byte of any other LUB 
to determine if a duplicate assignment 
exists. (Refer to VSE/ZAdvanced Functions 
Diagnosis Reference: Superv or for 
additional information pertaining to LUB 
and PUB entries.) 


ried out in the 

0 of the first LUB 
1s compared to th 

third, 


The comparison i r 


5 Cc 
following manner. Byt 
entry in the OPENC tab 
corresponding byte i 


a 
yte 
able e 
n the second, 

Ref. 
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fourth, etc., until the end of the table is 
reached. Then, byte O of the second LUB 
entry in the OPENC table is compared to the 


corresponding byte in the third, fourth, 
fifth, etc., until the end of the table is 
reached. The procedure is repeated until 
all of the LUB entries are similarly 
checked. If an equal comparison is made at 
any point in the procedure, checking is 
discontinued, error message 4¢885I is 


printed, and the job is canceled. 
SSBENDQB;: Enqueue and Dequeue for VSE/VSAM 
Routines 


Objective: To enable the VSE/VSAM routines 
to enqueue and dequeue their OPEN and CLOSE 
routines in the B-transient area of the 
Supervisor, although these routines are not 
themselves B-transient routines. 


Entry: From a VSE/VSAM routine that issues 
the ENQB macro. 

Exit: To the calling routine that issued 
the ENQB macro. 

Method: When a VSE/VSAM routine issues the 
ENQB macro, $$BENDQB is fetched Cvia SVC 2) 
from the core image library and put into 
the B-transient area. Control is 
transferred to S$S$BENDQB, which temporarily 
returns control (via SVC 8) to the routine 
that issued the EN@B macro. (The 
B-transient area is not released.) When 


the DEQB macro is i1s8SsSued, control 15s 
returned (via SVC 9) to the B-transient 
routine $$BENDQB, which has been previously 
loaded into the transient area by the ENQB 
macro. SSBENDQB now executes an SVC 11 to 
release the B-transient area and to return 
to the highest-priority program ready to 
run. (Note: The ENQB and DEQB macros 
Beer Ges the original contents of registers 
an ‘ 


SSBOPNR2: Relocate DTF Address Constants, 
Phase 2 

Objective:,To relocate the address 
constants in DTFCP, DTFPT, DTFDI, DTFDR, 


and DTFDU tables. 
Entry: From $$BOPNR3. 
Exit: To $$BOPEN. 
Method: This phase is 


SSBOPENR and performs 
the same manner. 


an extension of ; 
the same function in 


SSBOPNR3: Relocate DTF Address Constants, 


Phase 3 


Objective: To relocate the address 
constants of DTFs connected with unit 
record files. 


Entry: From $$BOPENR. 

Exits: 

° To $S$BOPNR2 if other than unit record 
files still have to be relocated. 
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* To the Open Monitor, $$BOPEN, 
files have to be relocated. 


if no more 


MODLOOP (CAddress Modification?) Subroutine 


The MODLOOP subroutine performs the actual 
address modification using an address 
modification table. The following example 
of the relocation of a unlabeled work file 
DTFMT table (see Figure 62 illustrates the 
operation of the MODLOOP subroutine and the 
use of the address modification table. 


Modification of the address constants 
starts with those in the common portion of 
the DTF table. At this time the following 
registers are loaded: 


e BASEREG - with the address of byte O of 
the DTF table (this register is used as 
a pointer within the DTF table). 


e MODREG - with the address of byte O of 
the address modification table at the 
label COMMON. 


° CCWREG - with the address of byte O of 
the DTF table. 


he address modification table at the label 
GMMON contains three hexadecimal bytes, 
"020808". The first byte is a count of 

e number of address constants (CADCONs) to 
This count 
ntrols the number of times the 

dification loop is used. The succeeding 
ytes contain displacement values to update 
the register, BASEREG. 

The first time through the address 


h 
e modified; two in this case. 
O 
Oo 


T30 04eKOHF 


modification loop, the second byte of the 
modification table (X'08') is added to the 
starting address of the DTF (CBASEREG) to 
obtain the location of the CCW address in 
the CCB to which the relocation factor 
(RELOCREG) is added. The count of address 
constants to be modified is then reduced by 
1, and the modification loop is entered a 
second time. Upon reentering the 
modification loop, the BASEREG contains the 
starting address of the DTFt8& to which is 
added the third byte of the modification 
table (X'08'). As a result, BASEREG then 
points to byte 16 in the DTF table, that 
is, to the logic module address. The 
relocation factor is added to this address 


and the count of address constants to be 
modified is again reduced by l1. Since the 
count now goes to QO, an exit is made from 
the modification loop. 


After determining that the DTF type is a 


in 
DTFMT work file, the MODLOOP subroutine is 
again used. This time the register MODREG 
is loaded with the address of byte OQ of the 
address modification table at the label 
MAGWORK ween contains four hexadecimal 
bytes, X'Q30C0G0C’. This means that three 
address constants (the address of the ae 
routine, the data address in the CCW, nd 


the address of the error routine) are ra be 
modified. The register BASEREG contains 
the starting address of the DTFt16 (carried 
over from the modification of addresses in 
the common portion of the DTF}. To this is 
added the second byte of the MAGWORK 
address modification table (X'OQC’"). As a 


Byte |\Bits|Function | 

ie mae : 

16(010) | X'O8"* indicates DTF { 

{ relocated by OPENR. | 

eee ne of logic module. | 

f20¢€14) | DTF type (X'10") | 

21(€15) 0 i = No rewind. | 

1 1 = Unload rewind. | 

2 |1 = Work file. | 

3 1/1 = Read backward. | 

| 4 1 = Write | 

| 5 1 = POINTHW. | 

| 6 1 = Force checking of read | 

or write. | 

| 7 {1 = Forward space before | 

| | | next operation. | 

ae: pee used. | 

ree Toa (aise length. | 

Beery ioe BLKSIZE. | 

{28¢(1C) | eae” op code. | 

29-31 { FOF address. | 

(1D-1F)] | 

130227) | pig | 

rere | Block count, initialized | 

(28-2B) | COGOOG000 for read forward, | 

| 00400000 for read backward. | 

44(2C) | : 1 = Error routine. | 
= Ignore. 

| 2 1 = Read next record switch| 

| 3 1 = Record fixed unblocked. | 

| | 4-7]Not used. 

leone | [Paes of error routine. | 

jets 2F) | ! 

Numbers in parentheses are displacements | 

in hexadecimal notation. | 


Figure 6. DTFMT Unlabeled Workfile Format 


result, BASEREG contains the location of 
the EOF routine address (that is, 16 + 12), 
or byte 28. 


Note: Register BASEREG points to the start 
of a G-byte field, the last three bytes of 
Which contain the address of interest. 


The relocation factor CRELOCREG) is then 
added to the address constant. This 
procedure is repeated for the remaining two 
address constants in the DTF table. 


SSBOPENS: RPS SVA Initialization Routine 


Objective: To load the RPS local directory 
list and phase loading routine into he 

SVA, if this routine was called by $$BOPEN 
during the first DASD open. 

Entry: From IPL and $$sBOPEN. 

Exits: To IPL and S$BOPEN. 


Method: When called by IPL» the SVA 
initialization routine returns immediatly. 
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If this routine was called by $SBOPEN 
during the first open of a DASD file», space 
is obtained from the SVA, and the local 
directory list and the phase loading 
routine are loaded into the GETVIS area of 
the SVA. A SYSCOM indicator (displacement 
X'FC') is set when all operations are 
completed successfully» or when either the 
GETVIS or load operations fail. 


SS$BOPENS exits back to IPL with an SVC 
ll or to $$BOPEN with an SVC. 2. 


SSVOPENT: RPS Phase Loading Routine 
Objective: To locate in or load into the 
SVA the RPS phases for all access methods, 
when called by an open transient. To 
remove RPS phases and release SVA space for 
a terminating job, when called by $IJBEOT. 


From open transients when RPS 
From 


Entry: 
support is provided for a DTF. 
SIJBEOQT when a job terminates. 


Exits: To the calling transient. 


Method: When called by an open transient, 
the RPS phase loading routine issues a load 
to search the RPS local directory list for 
the required phase. If the phase is not in 
the SVA, a GETVIS is issued to acquire 
Space and the phase is loaded. Exit is 
taken to the calling transient with the 
load address of the phase or an 
unsuccessful condition code set. 


When called by $IJBEOT, the routine 
searches the RPS local directory list for 
phases that were loaded into the GETVIS 
area of the SVA for a terminating job. If 
this is the last job requiring the phase, 


the SVA space is released and the directory 
entry is set to inactive. On return to 
SIJBEOT no condition codes are set. 


Close Monitor, Phase 1 


Objective: To determine the DTF file type 
and to fetch the proper close phase. 


SSBCLOSE: 


Entry: From a problem program CLOSE macro 
expansion, or from a successful CLOSE if 
more than one file is specified by the same 
CLOSE macro instruction. In addition, 
S$SBPCLOS enters $S$$BCLOSE at EQJ to close 
any unclosed 3800 printer extended 
buffering DTFs. 


Fxits: 
e To the appropriate close phase. 


e To the message writer if an error is 
detected. 


e To the problem program if no files 
remain to be closed. 


e To phase 2 of the Close Monitor, 
S$S$BCLOS2. 

¢ To $SBPCLOS when $SBCLOSE was originally 
invoked by $$BPCLOS. 


Method: The first phase of the Close 
Monitor begins the initialization of a 
table, located at the end of the logical 
transient area, for the close operation. 
This table is called the open table even 
though it is used by both initialization 
Copen) and termination (close) phases. 
Files requiring label processing, except 
for sequential DASD, also enter information 
into the GETVIS label area. 


Next, the S$$BCLOSE phase validates the 


address of the first 44 bytes of the DTF 
table for all file types except VSE/VSAM 
files; for VSE/VSAM files, phase $S$BCVSAM 
1s called. For magnetic tape (DTFDI> and 
DTFCP), unit record (DTFCD, DTFPT, DTFCN, 
and DTFPR), optical reader (DTFOR), and 
magnetic ink character recognition (CDTFMR) 
files, $$BCLOSE fetches the second phase of 
the Close Monitor, $$BCLOS2. 

For all sequential DASD files $$BCLOSE 
fetches the SVA link phase $$BOSFBL to link 
to the $IJJGTOP SVA phase to complete the 
close processing. For ISAM and DAM DTFs 
SSBCLLBL is called which in turn calls 
SSBCLOSG@ for ISAM DTFs and $S$BCLRPS for DAM 
DIFs. 

For all DTFMT and DTFPH-MT ieee 
SSBCLOSE fetches the SVA link pha 
SSBOTSVA to link to the S$IJJTTOP GVA phase 
to complete the close processing. 

For diskette files, $$BCLOSE reads label 
information into the transient label area 


at the beginning of the open table, saves 
address of this area in the open table for 
use by the next close phase, and fetches 
the diskette close phase $SSsBODIO4. 


SSBCLOS2;: 
Objective: To initiate the proper close 


rocedure for unit record, optical reader, 
ICR, and Optical Reader/Sorter files 


Close Monitor, Phase 2 
ve peor phase 1 of the Close Monitor, 


ase 1 of the Close Monitor, 
SSBCLOSE, to handle next DTF if any. 
CL 


¢ To $$B 
files. 


e To $$BCTCO1 for BTAM-ES 
telecommunication files. 


e To S$BCCPT1 for magnetic tape CDTFCP, 
DTFDI) files. 


e To $$BCMRO1 for magnetic ee ear eeser 
recognition (MICR) type file 


OSP for punch and paper tape 


¢ To the message writer phase, S$BOMSGI, 
if an invalid file type is detected. 


¢ To IJDPR3 for printer files opened in 
extended buffering mode. 


e To IJDPRT for PRT1 or 3800 printer files 
opened with DTFPR/CP/DI. 
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Method: 


The function performed by the 


second phase of the Close Monitor depends 
upon the file type: 


S$BCLOS4: 
Objectives: 


opened to a 380 
enters module IJ 
A) at offset 32 
cessing related 
The address of 
from the Anchor 
he address of th 
by issuing a CDL 
IJDPR3 is called o 
bit in COMRG is on, indic 
ne or more files were opene 
printer extended buffering m 


Ov AMetetOoOo 


apes 


or optical reader and unit recor 
iles, except paper tape and DTFC 
iles, the only function performe 
hase $$BCLOS2 is to turn off the o 
indicator in the DTF table for the 
being closed. 


For Lee punch files, after turning off 
the open indicator, $$BCLOS2 fetches 
phase $$BCLOSP if error recovery 15 
possible. 


‘Whah TT WetOHnOo ~OoO TUN - own 


For DTFCP and DTFDI magnetic tape files, 
S$S$BCLOS2 fetches phase $$BCCPT1 after 
first checking to determine whether or 
not tape error statistics by volume are 
being collected. For DTFCP and DTFDI 
punch files, phase S$S$BCLOSP is fetched. 
For BTAM~ES telecommunication files, 
SSBCLOS2 fetches phase SSBCTCOl. 

For 3505 or 3525 with OMR or RCE 
Specified, $$BCLOS2 resets the device to 


the normal mode. 


Close Monitor, Phase 4 


To determine the DTF file type 


and to fetch the proper close phase for 
ISAM files. 


Entry: 


From S$BCLOSE. 


Exits: 


Method: 
begins the 


To the appropriate close phase. 


To the message writer if an error is 


detected. 


To the problem program if no files 
remain to be closed. 


To phase IIPCLOSE if an ISAM DTF is 
linked with a VSE/VSAM file 


To phase $$BOCISC if CDLOAD for IIPCLOSE 


Was not successful 


This phase of the Close Monitor 
ini Rtializetion of a table, 


located at the end of the logical transient 


ar@a~», 


for the close operation. This table 


is called the open table even though it is 


used by both 
termination (close) phases. 
requiring label processing,» 


initialization Copen) and 
Files 


except for 


quential DASD, also enter information 
into the GETVIS label area. 

For ISAM DTFs, byte 16 bit O of the DTF 
table is checked. This bit is set to one 
by phase ISCOPEN if the ISAM DTF is linked 
With a VSE/VSAM file. In that case the 
close-active indicator is reset and phase 
IITPCLOSE is loaded _ using the CDLOAD 
function IIPCLOSE is a part of the ISAM 
Interface program, IIP. The user return 
address is stored from the user save area 
into the DTF, the file list pointer is 
stored into register Q of the user save 


area, control is given to ISCCLOSE, and the 


B-transient area is released. 


For all ISAM DTFs not linked to a 
E/VSAM file, $$BCLOS4@ reads label 
formation from the label information area 
to the open table for use by the next 
ase, and fetches the ISAM close phase 
BCISOA. 

SSBCLLBL: 
Processor 


Close Monitor Label Space 


Objective: To determine the size of the 
read-in area required to process the 
DLBLYEXTENT information and to issue a 
GETVIS for the required space. 


Entry: From $$BCLOSE. 


Exits 
e To S$BCLOS4 for an ISAM file. 


e To $$BOMSG1 if an error occurs. 


Method: $$BCLLBL, at close time, builds 
Parameter list and calls Symbolic Label 
Access to determine the amount of 
DLBL/ZEXTENT information to be processed. If 
the space obtained by a previous OPEN o 
CLOSE in this job step is not sufficien 
meet the label processing requirements, 
FREEVIS macro is issued to release this 
Space and a GETVIS macro is issued to 
obtain the required space. Pointers and 
channel programs are then updated and an 
exit is taken to the next phase. 


Wi 1D 


DASD RPS Common Close 


Objective: To reestablish the original DTF 
BAR was modified for ISAM/RPS or for DAM 
Ss. 


SSBCLRPS: 


Entry: 
e From $S$BCLLBL for DAM or ISAM DTFs. 


Exits: 
e To S$$BCLOSE for direct access or IO0CS 
type DTFs. 


« To $$BODACL for direct access type DTFs 
With user trailer labels. 


¢ To $$BOISOA for indexed sequential 
access type DTFs. 
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Method: This routine is called when the DTF 
for the device being closed was modified to 


support RPS. 


All access methods use this routine. 
Therefore, it is necessary to first 
determine the DTF type, since the 
displacements are different in each case. 
Refer to Figure 7 and Figure 8 on page 47. 


The addresses of the original logic module 
and channel program are restored in the 
DTF. The bits indicating an RPS DTF and 
that it has been extended into the virtual 
area are turned off. The user save area 
that was obtained for the DTF extension is 
freed, and the use count for the RPS logic 
module is decremented. 


SS$BOSDC1: SD Close Input and Output 
Objective: To restore the DTF to its 
original state in the event the file was 
not opened. 

Entry: From $$BCLOSE. 

Exits: 

e¢ To the CLOSE Monitor, $$BCLOSE. 


Method:;This routine iS only ee the 


File was not opened successfully. 
restores the DTF to its original state and 


returns to $$BCLOSE to process another DTF. 


S$BOSDC2: Close: Free Track Function 


Objective: To free any tracks held by the 
file being closed. 


Entry: From ISAM CLOSE. 

Exits: 

¢ To the close monitor, $S$BCLOSE. 
* To $$BCISOA for ISAM files. 


° To the problem program. 


Method: This routine searches the track 
hold table to determine whether a track is 
being held by the file being closed. I f 
so, an SVC 36 is issued to free the track. 
If another file remains to be closed, 
control returns to the close Reena 


S$S$BCLOSE. If ISAM files are be 

processed, control returns to SSBCISOA. 
Otherwise, control returns to the problem 
program. 


SSBOSDEV: SD Close 

Objective: When FEOVD has been specified, 
SSBOSDEV closes the current volume and 
opens a new volume. 

Entry: 

° From the FEOVD macro. 


DTFDA 
With 
trailer 


[Numbers in parentheses are displacements 


jin hexadecimal notation. 


1 If this bit is set on, the device 


supports RPS. 

2 If this bit is on, the DTF extends 
into the partition virtual area. 

> Bit 4 on indicates prime data. Bit 7 
on indicates index. 

Figure 7. Use of Different DTF Types by 

SSBCLRPS 
Exits: 
¢ To $$BOPEN. 


¢ To the problem program. 


Method: An interface to the DFE Cros SVA 
phase is established allowing the FEOVD 
request to be processed. 


SSBODQUE : 


Objective: To delete all entries for a 
a eas logical unit from the extent 
oc 


Entry: From the ISAM DASD open phase. 


Exit: To the problem program if no files 
remain to be opened, or to $$BOPEN, unless 
the name of the phase to be returned to is 
supplied by the calling phase. 


Method: After storing the contents of 
registers 3 through 8 and, if it is 
specified, the name of the phase to whi 
control is to be returned, phase $$BODQ 
builds the EXTENT macro parameter list 
All extent block entries for the logic 
unit of the current DTF are erased by 
vee ne an EXTENT macro for this logica 
unit. 


Phase $SBODQUE then fetches the calling 
Phase or SS$BOPEN, if the name of the 


calling phase was not supplied and there is 


another file to be opened. If the name of 
the calling phase was not supplied and 
there are no other files to be opened, 
Phase SS$BODQUE returns control to the 
problem program via an SVC ll. 
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J 
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Channel Program 
(Variable Length) 


Work Space 


[172 CAC) CExcept ISAM) 


ector values 

up to 4) 

80 (B4) 

ddress of original 
0 


S 
( 
76 (BO) 1 
A 
logic module 


1 
Address of | 
original channel 
program | 
] 


84 (B8) 
72 Byte Register Save Area 


256 (100) 
Ad onal Work Space 

bytes for DAM 

bytes for ISAM 


diti 
256 
128 


A A NS — ES SY EE i i A Sm LS A IE: Ge SE A AEE FR SEY SE 


ISAM RPS or DAM DASD Device 
Independent Extension Work Area 


Figure 8. 


SSBRELSE: Device Release 

Objective: To perform the actual device 
release of the units in the table released 
by the RELEASE macro. 


Entry: From the RELEASE macro. 
Exit: 
° To the problem program via SVC ll. 


Method: To perform the actual device 
release, the transient sets the unit to the 
permanent assignment, if one exists. 
Otherwise, the device iS unassigned. If 
the device is at permanent assignment 
vee? the transient takes no action on the 
uni 


The PUBOWNER bits of all requested units, 
for ce no other assignments exist, are 
reset. 


COMMONLY USED LOGICAL TRANSIENTS 


The logical transients included in this 
section of the manual are those that 
pertain to sequential, indexed-sequential, 
and direct access DASD files. 


S$SBOFLPT: DASD File-Protect 

Objective: To place the upper and lower 
extent limits into the Extent Block to 
provide file protection for DASD files. 


Entry:; 
e From phase $$BOISO? for ISAM files. 


Exits: 


e To the open monitor, $$BOPEN, if more 
files are to be opened anda specific 
phase name is not supplied. es 

° To the problem program if a specific 
Phase name is not supplied and no more 
files remain to be opened. 


e To the transient phase specified by the 
calling phase. 


Method: The SSBOFLPT phase provides file 
protection for DASD files by storing extent 
limit information in the extent block. 
Further information pertaining to the 
extent block ane LUBs is found in 
VSE/7Advanced Functions Diagnosis Reference: 


upervisor. 
The $$BOFLPT phase begins by determining: 
° The number of extents to be processed. 


e The addresses of the DLBL-EXTENT card 
image. 


° The file type. 
e The device type. 


When these factors are known, the phase 
determines the maximum number of extents 
per logical unit and the required GETVIS 
Space if the workarea is too small to hold 
all extents. It loads the extents per 
logical unit into the workarea and sorts 
them according to disk addresses. 
Contiguous extents are combined. The 
EXTENT macro is used to add extent entries 
into the extent block. After all logical 
units are processed, a FREEVIS is issued 
for the workarea, if necessary. 

From information passed by the calling 
Phase, SSBOFLPT determines the next action 
required and issues either an SVC 2 to 
fetch the proper transient phase, or an SVC 
11 to return to the problem program. 


S$SBODSPV:; VTOC Display, Phase l 


Objective: To determine the logical unit 
(SYSLOG or SYSLST) on which the operator 
i 


SLS 
Wants the VTOC displayed, and to print an 
error message if SYSLST is the unit 
selected but not assigned to a printer. 
Entry: From phases $$BODMS2, $$BODIO8, 
S$SBODSMO, or S$$BOMSG2 when the operator's 
response is DSPLYV. 
Exit: 
¢ To the second phase of VTOC display, 
SSBODSPW. CIf a diskette is being 
displayed, exit is to phase $SBODSPO. ) 
* To job control via an SVC 11 if the 
operator's response to message 4V95A is 
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END or CANCEL and the open was for job 
control 


e To phase $$BCNCL via an SVC 6 to cancel 
the job if the operator's response to 
message GV96A is END or CANCEL and the 
open was not for job control. 


Method: The first phase of VTOC display 
issues a message on SYSLOG to determine 
whether the operator wants the VTOC 
displayed on SYSLOG or on SYSLST. If the 
operator's reply is SYSLST», a check is made 
to ensure that SYSLST is a printer. 

SYSLST is not a printer, error message 


G4GV96A 1s issued. If the VTOC is to be 
displayed on SYSLST, preparation is made to 
start the display on a new page. Phase 
SSBODSPV then fetches phase 2 of VTOC 
display, $SBODSPW Cor, if a diskette is 
being displayed, $$BODSPV fetches 
SSBODSPO). 

SSBODSPNH: VTOC Display, Phase 2 
Objective: To display, on either SYSLST or 


SYSLOG, the VTOC for the volume currently 
being opened. 


Entry: From the first phase of VTOC 
display, $$BODSPV. 


Exit: To $S$BOMSGI or $$BODSMW. 


Method: The volume label on the current 
volume being opened is read to retrieve the 
pointer (CCHHR address) to the VTOC and the 
volume serial number. header line is 
printed to indicate the date and identify 
the volume by the volume serial number. 
Next, the first label in the VTOC (Cformat-4 
label) is read to determine the limits of 
the VTOC, and the CCN chain is initialized 
to read the file labels (Cformat-—l1) 
contained in the VTOC. 


The file label for each file on the 
volume is displayed by printing the 
contents of the label. The first line 
printed for each format-1 label contains 
the first 59 bytes of the label and 
includes: 


° filename 

° format identifier 

e file serial number 

° volume sequence number 
® creation date 

e expiration date. 


cceeding lines printed for a format-—l 
bel contain extent information. Each 

ine contains a maximum of three extents. 
f more than three extents are specified 
for the file, the additional extents are 
contained in a format-3 label.) When all 


Se ck 


extents for a file have been printed, phase 
S$BODSPW initializes to process the next 
format-1 label in the same manner. 

When all format-1l labels in the VTOC 
have been processed, the message ‘'VTOC 
DISPLAY COMPLETED is printed and coutret 
is passed to $$BOVDMP. Figure 9 15 
sample of the VTOC display printed by this 


phase. 
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OSFLYV DISPLAY 
Seri Mo Votume No, Creaton & Expsasteon Dates 


xs A 01709773 
2LL11311 0001 £9001 3-30180 


49001 3-63016D 


VOLUME SERTAL NOs IS 211111 


PAYROLL MASTER INPUT FILE 
27100 00840000-00840013 
ee 


Extents 


SYSTEM WORK FILE NUNBER 1 LLL11141 ooo1L 
0101 GOCLO0oG-00¢60013 


3330 INDEXED SCQUENTTAL OPEN STD LABELED 431131 0001 £9001 3-4900F9 


5100 H00C0000-003F 0013 


VTOC DISFLAY COMPLETED 


a eae re aes 


Figure 9. VTOC Display of Disk Pack 
CDSPLYV Response) 
SSBODSPO: Diskette VTOC Display 


Objective: To display, on either SYSLST or 
SYSLOG, the VTOC for the diskette currently 
being opened. 


Entry: From the first phase of VTOC 
display, $$BODSPV. 


Exit: To $$BODIO8, $SBODMSG, or $$BODSMQ. 


Method: The volume label on the volume 
currently being opened is read to retrieve 
the volume serial number, A header line 15s 
printed to indicate the date and identify 
the volume by the volume serial number. 
Next, the CCW chain is initialized to read 
ee labels CHDRI) contained in the 


The file label for each file on the 
volume is displayed by printing the 
contents of the label. The printed line 
includes: 


file name 

beginning extent 

end extent 

volume sequence number 
creation date 
expiration date 


When extents for a file have been printed, 
Phase $$BODSPO initializes to process the 
next label in the same manner. 


When all HDR1 labels in the YTOC have 
been processed, control is returned to the 
calling transient. Figure 10 on page 49 is 
a sample of the VTOC display printed by 
this phase. 


S$S$BOVDMO: Diskette VTOC Dump 
Objective: To provide a list of all the 


labels in the VTOC for the diskette being 
opened. 


Entry: From phase 2 of the Diskette Open 
Message Writer, $$BODMS2, or $$BODIO8, when 
the operator's response is CANCELYV>, or from 


the problem program. 
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Beginning Extent Volume Sequence No. Expiration Date 


‘End Extent Creation Date 


VOLUME SERIAL NO. IS HWS009 03/30/73 


INPUT 05001 08026 01 721201 741231 
INPUT 09001 10026 01 721201 741201 


DMPVTOC 11001 11026 730319 741231 


TSTJUCL 12001 13026 730321 741231 


VTOC DISPLAY COMPLETED 


VTOC Display of Diskette 
CDSPLYV Response) 


Exits: To phase $$BCNCL via SVC 6 to cancel 
the job if $S$BOVDMO is entered from the 
message writer phase $$BODMS2, or to the 
ites program, or to $$BOWDMO to continue 


Method: Phase $$BOVDMO reads the VOLI label 
to retrieve the volume serial number for 
the volume being opened. A header line is 
then printed on SYSLST to indicate the date 
and identify the volume with the volume 
serial number. If SYSLST 1s not assigned 
to a printer, the VTOC Dump is ignored. 


SSBOWNDMO: Diskette List VTOC 


Objective: To provide a listing of all the 
labels in the VTOC for the diskette. 


Entry: From phase 1 of the VTOC dump, 
$SBOVDMO. 

Exits: Control returns to job control or to 
the user's program. 

Figure Il on page 50 is a sample of the 
VTOC Dump printed by this phase. 

Method: All the VTOC labels for unsecured 
files Cexcept blank labels) and the file 
being accessed (whether secured or 
unsecured) are listed. Any other secured 
files are not listed. When all labels have 
been printed, an EQJ message is printed and 
control returns to the user or to job 
control. 


Note: NB, NS, NP, NE, or NV indicate that a 
label field is blank. B,S, P, E,s or 
indicate that the label field was found to 
be not blank. 

SSBODMSE: Diskette Open Error Message 


Writer Phase 


Objective: To initialize the message output 
area, SYSLOG CCB and CCWs, and to fetch 
phase 2 of the message writer, $SBODMS2. 


Entry: 


° From the diskette VTOC display phase, 
$$BODSPOQO. 


° From a diskette open or close phase. 
° From the DTFCP open phase, $$BODUCP. 
Exit: To phase 

writer, $$BODMS 
Method: The calling phase supplies the 


following information to the message 
writer: 


7 of the open error message 


e Register O contains the last four 
characters in the name of the phase 
requesting the message. On cancel 
messages, register 0 need not be 
initialized. $$BO is assumed for the 


first four characters of the phase name. 


e Register 2 contains the address of the 
DTF table for the current file. 


e Reqister 3 contains the message code (Cin 
binary) for the message to be printed. 
This code is converted to the last two 
digits of the message number (XX in the 
example 4nXXI). 


¢ Transient region + 1185 contains the 
numeric decimal value asstgned to the 
various open/close phases for message 
numbering (X in the example 4XnnI). 


e Transient region + 1000 contains the 
Start of the CCB. 


The message writer overlays the first 888 
bytes of the transient region. Therefore, 
any information that the calling phase 
needs to save is located beyond this point. 


This phase first saves the last four 
characters in the name of the phase 
requesting the message. It initializes the 
SYSLOG message output area with the 
organization type numeric code, DITF file 
name, and symbolic unit and constant. It 
builds the SYSLOG CCWs for writing the 
message and reading the response, and 
determines if he required message is in 
this phase of the message writer. If it is 


not in this phase, the routine determines 
which overlay phase contains the message 
Ceither $$BOMSG3, $$BOMSG4, $$BOMSG5, 
SSBOMSG6, or $$BOMSG7) and fetches $$BODMNS2 
to load the required overlay phase. 
SSBODMS2: Diskette Open Error Message 


Writer, Phase 


Objectives: To issue an error message to 
the operator, read the operator's reply (Cif 
an IBM 1052 Printer-Keyboard is assigned to 
SYSLOG) or exit to the phase that requested 
the message (after ensuring the validity of 
the operator's response). Also, to cancel 
the job either by operator request or, if 
the message type indicates this, by 
end-of-job. 
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VOLUME SERJAL NO. 1S HwWS009 


Ie cetle al 


o0008 HORI LABEL 


INPUT] 128 05001 08026 NB NS NP NE O01 7279231 7412317 NV 09001 
No Seeunty No Exchange 
00005 HORI LABEL 
INPUT 2 128 11001 10026 NB NS NP NE O1 721201 741231 NV 11001 
00010 HDR1 LABEL 
DMPVTOC 128 11001 11026 NB NS NP NE 730319 741231 V 11007 
00011 HDR1 LABEL 
TSTUCL 080 1200! 13026 NB NS NP NE 730321 741231 V 12020 
00012 HDR1 LABEL 
ooo13 HDRI LABEL 
OO014 HDR] LABEL 
00015 HORI LABEL 
00016 HDR] LABEL 
00017 HDR1 LABEL 
00018 HORI LABEL 
00019 HDR1 LABEL 
000726 HDR1 LABEL 
00021 MOR! LABEL 
00022 MDR) LABEL 
00023 HDR1 LABEL 
Oo024 HDR] LABEL 


00025 HDR1 LABEL 


00026 ADR LABEL 


VTOC LISTING COMPLETED 


VTOC Dump of Diskette (CANCELV 
Response) 


Figure ll. 


Entry: From phase 1 of t 
Error Message Writer, $$§ 


Exit: 
¢* To the VTOC dump phase, $$BOVDMO. 


* To phase 1 of the VTOC display routine, 
SSBODSPV. 


°* To the diskette open/close organization 
phase requesting the message (if a 
cancel was not encountered). 


he kette Open 
BOD ‘ 


Method: SS$BODMSG supplied the following 
information to this phase: 


e Register i contains the name (Clast four 
Characters) of the message overlay phase 
to fetch if the required message appears 
in some other phase than $$BOMSG1. 


e Register 3 contains the address of the 
message to be written on SYSLOG. 


This phase determines the message type. It 
can be either a file overlap pack» wrong 
pack, or other. 


For wrong-pack type, the message is 
initialized with the pack number and the 
wWwrong-pack switch is turned on. This 
Switch is interrogated later in the routine 
to test if the operator has mounted the 
correct pack. 


Next, the routine determines if the 
message to be written on SYSLOG 1S in main 
storage. If the message is not in main 
storage, the message overlay phase 
containing the required message is loaded 
into main storage. The message overlay 


Phases consist of $$BOMSG3, $$BOMSG4, 
SS$BOMSG5, $SBOMSG6, and $$BOMSG7. These 
phases contain messages only. The message 
is then moved to the SYSLOG output area and 
an SVC 0 iS issued to type the message and 
read the reply. 


If the message indicates the job i n 
to be canceled, the routine determine i 
the user wants a VTOC display. If a VTO 
display is wanted, the routine issues an 
SVC 2 to fetch $$BODSPV, the VTOC displa 
phase. If the user does not want a VTOC 
display, the routine tests for a D-type 
message. 


If the message is a D-type, the message 
return indicator is set, the address of the 
next phase name is retrieved, and an SVC 2 
is issued to fetch the return phase. If 
the message is not a D-type, the routine 
tests the wrong-pack switch as previously 


mentioned. 


The message writer issues an illegal 
response message for the following 
conditions: 


l. Operator reply of IGNORE for a D-type 
message. 


2s Equal file ID message. 
33 No EXTENT to be bypassed. 
G. Next pack not mounted. 


If the job is to be canceled, a test 
determines if the job control open switch 
Cin communications region) is on. If so» 
an SVC 11 is issued to return to job 
control. If the switch is not on, the 
routine checks to determine if a request 
has been made for a VTOQC dump. If yes, an 
SVC 2 is issued to call the VTOC dump 
transient, SSBOVDMO. If a VTOC dump has 
not been requested, an SVC 6 is issued and 
the job is canceled. 
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Figure 13 on page 54 shows the message 
code (passed via register 3) together with 
the last two digits and action tndicator of 
the associated number. For reference 
purposes, the text of the message is also 
included. 


BODSMO: Diskette Data Security Message 


iter 


$$ 
Wr 
Objective: To issue message 4n99D and read 
the reply from the operator. 


Entry: From $$BODSP0, S$BODIOL, $$BODIO5, 
and return from $$S$BODSPV. 

Exits: The exit depends on the operator's 
reply to message 4n99D. 


e If reply is YES, control returns to the 
problem program. 


e If the reply is EOB, NO, CANCEL, or 
Cee the problem program is 
anceled If a VTOC dump is requested, 
$BOVDMO. is fetched. If §$$BODSMO was 
aed by job control, an exit is made 
to job control. 
e If the reply is DSPLYV, $$BODSPV is 
fetched. 
Method: After gathering preliminary data 
about the calling routine, S$BODSMO issues 
message Gn99D, "DATA SECURED FILE/VOLUME 
ACCESSED' If the operator types YES on 
SYSLOG, the file is made available. 
SSBOVDMP: VTOC Dump 


Objective: To provide a list of all the 
labels in the VTOC, for the volume being 
opened. 


Entry: From phase 2 of the Disk Open 
Message Writer, $$BOMSG2, when the 
operator's response is CANCELV, or from the 


Problem program. 


Exits: To phase $$BCNCL via an SVC 6 to 
cancel the job if $$BOVDMP is entered from 
the message writer phase $$BOMSG2, or to 
the problem program, or to $$BONDMP to 
continue CANCELV. 


Method: Phase $$BOVDMP reads the VOL1 label 
to retrieve the volume serial number and 
the CCHHR address of the VTOC for the 
volume being opened. A header line is then 
printed on SYSLST to indicate the date and 
identity of the volume with the volume 
serial number. If SYSLST is not assigned 
to a printer, the VTOC Dump is ignored. 


S$$BOWDMP: List VTOC 


tive: To provide a listing of all the 
s in the VTOC. 


Eroe phase 1 of the VTOC dump, 


o_o 


as 


: If no record if found, exit is to 
isk message writer, $$BOMSG1. 

wise, contrel returns to job control 
o the user's program. 


ethod: All the VTOC labels for unsecured 
iles Cexcept blank labels) and for the 
file being accessed (whether secured or 
unsecured) are listed. Any other secured 
files are not listed. A maximum of five 
extents are printed on a line. When all . 
labels have been printed, an EOJ message is 
printed, and control returns to the user or 
to job control. 


tz OOrem om KO 
Jcrox 


Figure 12 on pa Sample of the 


g Ss 
VTOC Dump printed by 


S52 j 
this 
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CANCELV DISPLAY 


VOLUME SERIAL NO. IS LLLL11 


Oooo000004 FORMAT 4 LABEL 


o4040404 o4040404 o4040404 o4D40404 O4n40404 o4n4o4n4 oenedeoe nenenene. ococoens 
OOOOOLEF OOCA8OO0e OD3A8001 OOOOOOCB O002341C7E Se2D2pN1 02161611 oOnDD0000 oDDDDNDO 
Ooo00000 oop00g00 o0010000 oO000000 OO0001300 oOoODD0000 oDDDD000 gooDoOoDD oDooooDOD 


odooooo000s FORMAT S LABEL 


o505050S oo000000 opono000 ooo000000 oOD00000 oooDDoDD odoooooO ooOoDoODD oDveecen 
ooo00000 oooo0000 oo000000 ofo00000 sODDD000 ooooDDOD oouDDDDD oOoDDDDOO ooccooOO 
Ooooo000 ooo00000 ooo000DD ooonoDo oODDODDD ooDD00DD oooooDoD oODDDDOO ooooonooD 


DODDOODODDK =FORMAT 1, LABEL 
PAYROLL MASTER INPUT FILE 
40404040 ¢040¢000 ooo0000e ooos0000 onD0Dso4z0 «40404000 ooD00000 “4020 
2100 OO0840000-00880013 oO000 oOD000000-DOD0OD000 ob00 oo0ND000-ooDoDKND 
Dooooo0007? FORMAT 1. LABEL 
SYSTEM WORK FILE NUMBER 1 
Ooooco00 oOdoo04D oooDoDeO oDUDODD0 oODD0cooo aooD00DO oooooooN ooDoD 
0101 OOCBOO00-00¢£0013 oo00 -00000000-00000000 obp0D osOo0DD000-cDD00000 
oooooo000e FORMAT 1 LABEL 

3330 INDEXED SEQUENTIAL OPEN STD LABELED 
ooo000008 o0000040 oo0o0000 oO0000D00 condD00D ooNvoooo ooDooDoDO oDDO 
0100 OOOCEO000-003F0013 oO00 oDD00000-o0000000 on00 oodDD000-oo0n0000 


VTOC LISTING COMPLETED 


Figure 1i12., 


SSBOMSGi Disk Open Error Message Writer, 
Phase l 


Objective: To initialize the message output 
area, SYSLOG CCB and CCWs, and to fetch 
phase 2 of the message writer, $$BOMSG2 for 
informational messages. For messages 
requiring operator action/response, 
SSBOMSVA is fetched, which in turn 
transfers control to the SVA. 


Entry: 
e From a DASD open or close phase. 


* From the DTFCP open phases, S$S$BOCPOI1, 
S$$BOCPO02, $$BOCP11, or $$BOCPi12. 


From IJDPRT OPEN routine. 


pen error message 
G2, or to SSBOMSVA CSee 
unctions Diagnosis Reference: 


g Phase supplies the 
1on to the message 


ns the last four 
e name of the phase 
essage. Qn cancel 


* Register Oc ai 
th 
m 
ster 0 need not be 
$$ 
ra 


re) 
characters 1 
peg dese nS. : 
messages, 

faire tolised. 
first four c 


BO is assumed for the 
cters of the phase name. 
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04040404 O4040404 =F 4000000 
00000000 oo00f000 ooD000000 
ooo00000 ood000000 


cacoooog oo0g0o0c00 FSsoooodD 
Oocooo0a oocoonon xsoo0000D 
ooooo000 ooooDo0oo 


SERIAL NO» 4211311 VOL NO, OOO 490013-b3016D 014040 


SYSs CODE IS DOS/370 VER 4 
POINTER 1S goOOoo000000 


SER{AL NO.e 111131 VOL NO. OODL 490013-b3016D 010700 


SYS; CODE IS DOS VERSION S 


POINTER |S oogoo00000 


SERIAL NOs 2412331 Vo. NO. OO01 490013-4900F9 010700 


Sy¥S. CODE 1S mm RAFTOL nx 


POINTER IS OO00000000 


VTCOC Dump of Disk Pack (CANCELV Response) 


e Register 2 contains the address of the 
DIF table for the current file. 

e Register 3 contains the message code (Cin 
binary) for the message to be printed. 
This code is converted to the last two 
digits of the message number (xx in the 


example 4nxxI). 


Transient region + 1185 contains the 
numeric decimal value assigned to the 
various open/close phases for message 
numbering. Cx in the example 4xnnI.) 


e Transient region + 1000 contains the 
start of the CCB. 


The message writer overlays the first 888 
bytes of the transient region. Any 
information that the calling phase needs to 
Save is located beyond that point. 


This phase first saves the last four 
characters in the name of the phase 
requesting the message. It then checks the 
message type. For action type messages, 
SSBOMSVA is fet ed in order to transfer 
control to the : For information type 
messages, it in alizes the SYSLOG message 
output area wit he organization type 
numeric code, D filename and symbolic 
unit and constant. It builds the SYSLOG 
CCWs for writing the message and determines 
if the required message is in this phase of 
the message writer. If it is not in this 


ch 
SV 
it 
h 

TF 
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phase, the routine determines in which 
overlay phase the message is located 
(either $$BOMSG3, $$BOMSG4, SSBOMSG6, 
SSBONSG7, or $$BOMSG8) and fetches $SBOMSG2 
to load the required overlay phase. 


SSBOMSG2: Disk Open Error Message Writer, 


hase 2 


Objectives: To issue informational error 
message to the operator, and to cancel the 
job if the message indicates end of job. 


Entry: From phase 1 of the disk open error 
message writer, $SSBOMSGI. 


Exit: 


* To the DASD open/close organization 
phase requesting the message. 


Method: $$BOMSG1 supplied the following 
information to this phase: 


e Register 1 contains the name Clast four 
characters) of the message overlay phase 
to be fetched if the required message 
appears in some phase other than 
SSBOMSGI1. 


e Register 3 contains the address of the 
message to be written on SYSLOG. 
This routine determines if the message 
to be written on SYSLOG is in storage. 
the message is not in storage, the message 
overlay phase containing the required 


message is loaded into storage. The 

message overlay phases consist of $$BOMSG3, 
SSBOMSG4, $$SBOMSG5, S$S$BOMSG6, $$BOMSG7, 
SSBOMSG8, and $$SBOMSG9. These phases 
contain messages only. The message is then 
moved to the SYSLOG output areas and an SVC 
0 is issued to type the message. 


Then, a test determines if the job 
control open switch Cin communications 
region) is on. If so» an SVC 11 is issued 
to return to job control. If the switch is 
not on», an SVC 6 is issued and the job is 
canceled. 


Figure 13 on page 54 shows the 
message code (passed via register 3) 
together with the last two digits and 
action indicator of the associated message 
number. For reference purposes, the text 
of the message is also included. 


SSBODSMW Data Security Message Writer 


Objective: To issue message 4&n99D and read 
the reply from the operator. 


Entry: From $$BODSPH, $SBOIS06, S$SSBORTVI; 
and return from $$BODSPV. 


Exit: To S$S$BOMSVA (see VSE/Advanced 
Functions Diagnosis Reference: LIOCS Volume 
Method: After gathering preliminary data 
about the calling routine, S$SBOMSVA is 
fetched to transfer control to the SVA. 
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ode 


55a 
[GOA 
ae 
azn 
33A 
166A 
159A 
184D 
| 31D 
[38D 
| 39D 
[08D 
La7A 
|86D 
| Oo! 
[O11 
[O21 
O31 
041 
{O51 
|O61 
[O71 
oor 
| oo! 
O1l 
[O21 
O31 
feet 


A- and 
issued b 
by SIJJG 


Figure 13 (Part 10 
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| essage|Message| | 


{Number 


G44 \eileenal ON UNEXPRD FILE | 


|Message | 


|WRONG PACK, MOUNT nonnnnn 
| EXTENT OVERLAPS ANOTHER 
[EXTENT OVERLAP ON VTOC 
NO MATCHING EXTENT 
EQUAL FILE ID IN VTOC 
[1 TRACK USER LBL EXTENT 
[INVALID EXTENT | 
NEED FILE PROTECT RNG | 
[VOLUME SEQUENCE ERROR | 
[USER HDR LBL IS NOT STD | 
[USER TRL LBL IS NOT STD | 
NO UTLO FILE MARK FOUND | 
| EXTENTS NOT ON SAME nee 
| TAPE UNIT NOT READY 
ve RECORD FOUND 
Bas RECORD FOUND | 
|NO RECORD FOUND 
INO RECORD FOUND 
| NO RECORD FOUND 
NO RECORD FOUND 
NO RECORD FOUND | 
| No RECORD FOUND | 
INO RECORD FOUND 
INO LABEL SPACE IN VTOC 
INO FORMAT 1 LABEL FOUND 
INO FORMAT 2 LABEL FOUND | 
INO FORMAT 3 LABEL FOUND | 
vA 


NO FORMAT LBL IN VTOC 


Disk Open Error 
Message Writer 


Functions Diag. Ref. 


Message Code for 


Weeegod | Meseagel | 


[eae OVERLAPS ANOTHER 
me MORE AVAIL/MATCH one 


156 as ee FILE LBL DELETED 
57 1401 


| 
58 fala 


Code |INumber {Message | 
37 O61 NO STANDARD VOL1 LABEL | 
138 41I [EXTENT OVERLAP ON VTOC | 
39 1461 [DISCONT INDEX EXTENTS | 
40 ion SYSUNITS NOT IN SEQUENCE | 
G1 1521 DISCONT TYPE 1 EXTENTS | 
Ge {541 DSKXTN ENTRY TABLE FULL | 
43 [621 [INO PRIME DATA EXTENT | 
44 451 {TOO MANY EXTENTS | 
45 1491 [DATA TRACK LIMIT INVALID | 
46 |59I |INVALID EXTENT | 
47 | 60L INO EXTENTS, ALL BYPASSED | 
48 | o1t [INVALID DLBL FUNCTION | 
49 631 LOAD FILE NOT CLOSED | 
50 | 801 INVALID FILE TYPE | 
51 = [NO LABEL INFORMATION | 
52 |a31 INVALID LOGICAL UNIT | 
53 901 [SVA EXTENT AREA EXHAUSTD| 
54 871 SYS FILE EXTENT EXCEEDED | 
* {351 | DELETED WORKFILE LABEL | 
| | 

| 

| 


Message Code for 
Disk Open Error 
Message Writer 


Figure 13 (Part 2 of 3). 
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iMeecéqathecesoe | 
(2555 |INumber {Message 


[59 
[60 
161 
| 62 
163 
| 

164 
168 
69 
70 
174 
[74 
175 
76 
177 
{80 
|82 
[8&3 
|35 
[86 


| | 
on wet ee ean ae I70 ERROR | 


| 
48I SYSIN/SYSOUT UNSUPPORTED | 


| 701 IST XTNT CD NOT INDX VOL 
I711 [EXTENT INFO NEEDED 

| 721 |MOD AND DTF caused 
[581 INO EXTENT FOR OUTPUT | 
| {FILE 

| a8! |[EOF ON SYSTEM FILE 

| 981 OVLAP UNEXPRD SECRD FILE 
[691 {FILE IS OPEN FOR ADD 

|971 |OVLAP EXPIRED SECRD FILE 
[ast INVALID FORMAT RECORD 

| 301 [INVALID HDR1 LABEL 

| 331 EQUAL FILE ID VTOC | 
| 371 aoa TO SYSTEM UNIT 
j311 VOLUME SEQUENCE ERROR 
[821 ISAM NULL FILE 

[741 BLKSIZE OPEN FAILURE | 
1751 [BLKSZ NOT MULT OF RECSZ 

| 781 NO LOGIC MODULE ... 


| | 
| 79] pects FAILED | 


Figure 13 (Part 3 of 3). Message Code for 


Disk Open Error 
Message Writer 
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CHARTS 


Chart O1. Open Monitor 


Entry to 
Open Monitor 


I 
V 


| $$BOPEN 


l1.Called by OPEN macro for 
| Disk? 


a eas a 


Vv 
2.RPS initialization 
necessary? 
No Yes—————— 


$S$BOPENS 


- Get space in SVA 
- Load the RPS open 
routine. 


n 
ransient open table. 
secdlete and save PUB2 


{| 
| | 
| 
| | 
_ 
a Poet 
* ‘ itialize part of 
| 
{ dress for tape devices. 


V 
SSBOPENI 
1.More files to open? 
Yes No. 
’ 


2.Determine file type. 
3.Set up to fetch proper 
open routine. 

4.DTF device type? 

Unit Record 


a 


Tape Call proper Tape 
>| open; Chart Q3 


| 

| Telecommunications 

>|Call $sBOTCOl1 
| VSE/VSAM 

| >|Call $$BOVSAM 


Vv 


Chart O02 
Note: 


Telecommunications and VSAM are not documented in VSE/AF LIOCS Manuals. 
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Chart O02. Open Monitor 


From Open 
IMonitor Chart | 
Ee Ie | 


S$BOSFBL; 


and 


if 
is area for labels. 
f 


SAM) 
eck 
information. 


4aaH 


>| S$SBOPEN2 | 


| 


G4.For Sequential DASD or | Process extent limits | 
Direct access DASD 
| | 
V 
Call s$sBOISQO1 
Chart 04 


| 
| 
| 
| 
| 


| 


SSBOSFBL 
1.Locate ray 


Phase (SIJ 
[2.Exit the LT 

and transfe 

SIJJGTOP. 


Charts 57 
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Chart 03. Open Magnetic Tape 


Open Tape 
from Chart O01 


| 
V 


DTF file type? 
For DTFMT, DTFPH—MT 


For DTFCP, DTFDI 


SSBOTSVA 


1. Locate OP 
phase (6I 


SSBOPEN2 


Read and check DLBL/ZEXTENT 
information 


SSBOESTV 


Retrieve and process TES 

Aah al from PUB2 S$IJJTTOP 

able. 

Write TES record an SYSREC Process OPEN request 
ee from JOBCTLJ or Exit the SVA and transf. 
ogee LD. control to $$BOTLTA 
es 


SSBOTLTA 


Return to open monitor to 
handle next DTF or to 
return to problem program 
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Chart 04. GQpen ISAM 


Open [tS 
from Chart 02 
$$BO!IS01 


. Get address of DLAB and 
EXTENTs. 


. Compute no. of tracks of 
the independent overfiow 
extent. 


$$BO01S02 


If load create file: 

@ Check for dup. ID in 
VTOC. 

@ Check incomming extents 
against all existing files in 

VTOC for overlap. 


If input file: 

@ Read format-1 label for 
file. 

@ Check incomming extents 

against Format-1 extents. 


$SBO!ISOS 


1. Save extent limits. 


2. Buiid OSKXTNT table. 


$SBOISO6 


. Check labels for input 
files. 


. Create labels for output 
files. 


$$BOISO7 


. Get format-2 label and 
update DTF table. 


. Put EXTENT card infor- 
mation and constants in 
DTF table. 


. File protect? 


SSBOFLPT 


1. Put extent information in 
extent block to file protect 
DASD files. 


2. More files to open? 


SVC 11 return to 
Problem program 


SSBOISO8 


1, Build CCW chain in 


IOAREAL. SVC 2 
SSBOPEN 


. Update prime data 
in-storage add section of 
DTF. 


Charts 59 


Chart 05. Close Monitor 


[a] 


[call SSBCLRPS | 
2S eee 


S$S$BOSFBL 


l1.Locate S$IJJGTOP 


phase in SVA 
2.Call $SIJJGTOP 
to complete the 


CLOSE processing 


N 


i 
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[close entry| 


| 
V 


Vv 
6.If file protect 
set dequeue req 
7.Read label 


SSBCLOSE 
1. More files to close? 
-co No 
V | 
2. Set up to fetch proper [| 
close routine | 
- VSE/VSAM file? | 
a Te 
V 
G. OPEN ignored and no | 
DASD or DTFMT 
Yes ye | 
V | 
5. DTF file type? | 
DTFDA | 
DTFPH—DA | DTFMT | 
DTFSD or | DTFPH—-MT | 
CP/DI lala | 
DTFPH—SD | | 
DISKETTE | 
| 
[ 
H 
| 
| 


Oa cea a 
DTFIS 


V 
8.Read label 
Other | information 


Ref. LIOCS Volume 1 


SSBOTSVA 


[1.Locate IJJTTOP 
in SVA 

2.Call ot ae to 

| complete CLOSE 
processing 


| 
V 


| SSBOTLTA | 
Free workareas | 


| 
V 


LA} 
$S$BODIO4 


here last Brock | 
Peper: user 
| 
| 


labels or Feed 
diskette 
3.Set file status | 


| to closed | 
| 
V 
[a] 


| 


Notes: 
~~ $$BCLLBL is called to GETVIS the label buffer and to read the label 
nformation for DASD files. 


J 


2) 
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Chart O5A. Close Monitor Part 2 


sSBCLOS2 
1.Device 3800 and ext. buff. DTF's 


>[call IJDPR3 | 

ay Cae a eae eee E, 

DTYFCP 

or 380 ] 

a knee nes IJDPRT | 
V 


SSBCMRO1 


Unit record 


Paper tape | 
V 


G. ence file open indicator 
in 
5.2520 or 2540 punch file? 


“ Yes 
Vv | 


[ nr 

| 

| : 
V 

| 

[ 

| 

| 6.Paper tape file | 

| 

I 

V 

e 

N 


el Chart 05, entry A 
L_} 
V 
> | SSBCLOSP | 


| 
| 
| 
> 
| 
| 
| 
: 
| 
! 
| 
| 
| 


No Yes | 
| 1.Repunch correctable | 
i; | error in last card. | 
TP { “—->]}] 2.Check last record if | 
| | ouput file with two ID | 
| | areas. 
DTFCP/DI | | 
7.Device type tape? { 
: al mae | >|Chart O5, entry A 
| i 
| V 
| 8.System file? >| SVC 2 | 
Yes No |I$$BCTCOl | 
10.2520 or 2540 | —————_—___—_ 
punch file 
- ee ee 
> SVC 2 
S$S$BCCPTI1 


V V 


[chart 05| 


| entry A| 
Smee ey 


Note: 
$ TCO1 is not documented in VSE/Advanced Functions LIOCS 
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Chart O0O5B. Close Monitor Part 3 


S$SBCLOSG from 
| Chart O05 | 
a | 


| 
V 


S$S$BCLOSG4 

1 ISam DF linked with VSE/VSAM 
ile? 

‘es No > SSBCISOA 
| V 1.Read, format, and | 
2.CDLOAD successful? rewrite—format—l—and 
| Yes format—2 labels. 
| 


0 
e 
| 


2.More files to close? 
Fig No | 
| | a 9 
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Chart 06. EOF/EOQV Routine 


$$BCEOVI1 S$S$BCMTO7 

Determine file 1. Close _ current SYSPCH or 

and format of SYSLST output file by 

the file from writing tapemark 

its DTF 2. Rewind and unload initial 
tape reel ; 
Switch to alternate drive 
if specified 


S$BOTSVA 


see Chart 03 $SBJCOPT 


Open alternate tape assigned 
to SYSLST or SYSPCH by 
reading label/tapemark 


V 


SVC 11 return to 
problem program 


Charts 63 
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Chart 07. Open Diskette, Input 


Diskette Open Input 
from Chart 02 


$$B35401 


. Get next OLBL extent. 
2. System file open? 


No 
Unit exception? 
Yes Yes 


3. Get extent information for 
DTF from DIB. 


. More files to open? 
No 


Bypass required? 
No 


6% 


SVC 2 


SBOPEN 


SSBODIO1 


1. Process VOL1 label. 
2. Secured volume? 


> Yes 


Call $$BO0DMSG 
to print message 


$SBODIO5 


1. Process HDR! label. 


2. Another file to 
open? 


No 


SVC 11 return to 
Problem program 
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| Call 
$SBODSMO 
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Chart 08. Open Diskette, Output 


Diskette 
Open Output 
from Chart 02 


$$835400 S$BOD!01 


1. Control sequence operation, 


Secured volume? 


2. System file, and open? 


- No ; 
File open, but no more extents? 
Yes 


No 
3. Use DIB to complete DTF. <> 
4. More files to open? 
No 


1. Cause duplicate 
data set? 


Call SSBODMSG 
. Determine extent to print message 
limits. 


. Delete duplicate and 
overlapped labels. 


» At least 1 track 
available ? 
3. Cancel requested? 


Calf SSBODMSG 
Yes No . Create and write to print message 
<> new HDR? label. 


No 


Call $$BO VDMO Cali $$BODSPV 
to dump VTOC to display VTOC 
SVC 11 return to 
. Close required ? problem program 


SVC 11 return to 
problem program 
Call 
SSBOPEN 


$SBODIO8 


1. Operator communi- 
cation. 


2. Continue response? 


No Yes 


Call Call 
SSBOPEN SSBODIO4 
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APPENDIX A: MASTER ERROR MESSAGE LIST 


The messages in this list _ are arranged in sequence by message number. 
The message numbers of all logical [0CS messages start with the digit 4. 
The second digit of the message number indicates the type of file or 
routine issuing the message. The indicators are: 


0 = Punch file 

1 = Magnetic tape file 

2 = ISAM : : . 

3 = Sequential DASD, diskette = open input 
G = Sequential DASD, diskette - open output 
5 = Sequential DASD, diskette - close 

6 = DAM —- input 

7 = DAM - output 

8 = Common open/close routines 

9 = Sequential DASD - work file 

V = VTOC display routines 


The alphabetic character after the message number is the action 
indicator. These indicators are: 


Action 

Indicator Meaning 

A - Action The operator must perform a specific manual action 
before the program can continue. For example, mount a 
tape or ready an I/0 device. 

D - Decision The operator must make a choice of alternative courses 
of action. 

I - Information The message does not require immediate operator action. 


For example: This type of message can indicate 
successful completion of a problem program. 


The number(s) in the volume column refers to the documentation of the 
message issuing routine(s) in the following VSE/Advanced Functions 
Diagnosis Reference manuals: 

1. LIOCS Volume 1: General Information and Imperative Macros, 

2. LIOCS Volume 2: SAM, 

3. LIOCS Volume 3; DAM and ISAM. 

4. LIOCS Volume 4&4: SAM for DASD 


For oe ener detailed information on these messages, see VSE/Advanced 
Functions Messages. 
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[Message | [ | 


ee eee 


Number [Module 
4110A $S$BOCPT3 NO VOL1 LBL FOUND TLBL=xxxxxx filename SYSxxx=cuu 
| | IJJTOPN 
{4111I SSBOCPTS 2 NO VOL1 LBL FOUND filename SYSxxx=cuu 
[ {IJJTOPN 2 
4112A SSBOCPT3 2 VOL SERIAL NO. ERROR TLBL=xxxxxx filename SYSxxx=cuu 
{$$BOCPT4 | 2 
| IJJTOPN 2 
4113D SSBOCPTG 2 NO HDR1 LBL FOUND filename SYSxxx=cuu 
41131 ae 2 | 
G11G4A SSBOCPTS 2 FILE SEQ NO. ERROR filename SYSxxx=cuu 
{IJJTOPN 2 
G1L15A SSBCCPTS 2 FILE SER. NO. ERROR TLBL=xxxxxx filename SYSxxx=cuu 
IJJTOPN 2 
G116A S$SBOCPT4 2 VOLUME SEQ. NO. ERROR filename SYSxxx=cuu 
1IJJTOPN 2 
D IJJTOPN 2 NO TM FOUND ON READBK filename SYSxxx=cuu 


117 
18D | TJJTOPN [ee Pee ID ERROR, READBK filename SYSxxx=cuu 
119A 


$$BOCPT3 2 FILE UNEXPIRED filename SYSxxx=cuu 
|TJJTOPN 2 

4120I 1|ITJJTOPN 2 TAPE POSITIONED WRONG filename SYSxxx=cuu 
[ITJJTSRV 2 

41221 |IJJTEOF 2 EQV ENCOUNTERED SYSxxx=cuu 

4123D |IJJTOPN 2 WRONG POSITN, READBK filename SYSxxx=cuu 

41231I | | 

4124I ITJJTSRV 2 TOO MANY UHL'S filename SYSxxx=cuu 

41250 IJJTOPN | 2 VOL1 LBL FOUND filename SYSxxx=cuu 

G126I  |IJJTSRV | 2 [Ev ENCOUNTERED filename SYSxxx=cuu 

41281 |IJJTOPN ACCESS TO FILE NOT ALLOWED filename SYSxxx=cuu 
[ITJJTSRV | 


4130A IJJTEOF 
4131D eee 


EOF OR EOV INQUIRY filename SYSxxx=cuu 


2 
2 
2 
2 BLOCK COUNT ERROR filename SYSxxx=cuu DTF=xxxxxx 
2 LBL=xxxxxx 
2 
2 
2 
2 


ERROR IN FILE ID filename SYSxxx=cuu 


ST A A AT eS A eee Aen oe ah ea Nl SS OG ES EE A ED A ES Se SD CN A SS A EY A SS A ES RG NS SY ER I a A A EY SE ED NE LS ES RR 


ERROR IN HDR LBL filename SYSxxx=cuu 


zo4ij2zH 
‘7 


Figure 14 (Part 1 of 8). Master Error Message List 
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Message | | | 
[Number |Module | Chart|Volume|Message | 
14140A |IJJTSRV aa i oe NO ALTERN DRIVE ASSGN filename SYSxxx=cuu | 
41511 IJJTOPN f 2 HDR1 LBL INFORMATION filename SYSxxx=cuu | 
| 
41704 $$BJCOPT | 2 |FILE PROTECTED TAPE filename SYSxxx=cuu 
ees SSBJCOPI 2 UNEXPIRED FILE SYSxxx=cuu 
Ja172a IJJTOPN | 2 [INVALID LABEL SET SYSxxx=cuu | 
141831 |$$BJCOPT 2 INVALID LOGICAL UNIT filename SYSxxx=cuu | 
| IJJTOPN | | 
[4184D |$$BOCPT2 2 NEED FILE PROTECT RNG filename SYSxxx=cuu 
| 1$$BOCPT3 2 
| iIJJTSRV. | 2 | 
141851 |$$BOMRCE 2 INVALID FORMAT RECORD 
| 1$$BOMRCE 2 
41901 IJJTOPN 2 LOG. UNIT NOT ASSIGNED TO A TAPE filename SYSxxx=cuu . 
141911 |IJJTLOG 2 ERROR WHILE PROCESSING FILE filename SYSxxx=euu RC=nn_ | 
| | IJJTOPN 2 
| ITJJTSRV | 2 
| | TJJTTOP 2 
4192 IJJTSRV a Sa VOLUME ACCESS DENIED filename SYSxxx=cuu | 
141931 |IJJTSRV | 2 {FILE ACCESS DENIED filename SYSxxx=cuu | 
40001  |CDMOD 2 RETRY | 
IS$BCLOSP | 2 | 
| ($$BCLOSP | | 2 
| ISSBERRIN | 2 
'4n00I |IJJGSDVH | 3-93 4 NO LABEL SPACE IN VTOC | 
144001 |$$BODIO3 Ed 2 | 
I4n01I |IJJGSDVH | 3-93 4 NO FORMAT 1 LABEL or NO RECORD FOUND 
[42011 |$sBorso2 | 3 
|$SBOISDOA 3 
[43011 |$$BOSIOS5 2 | 
142021 |$$BCISOA | 3 [NO RECORD FOUND 
‘anos IJJGDAI1 | 3-66 4 NO FORMAT 3 LABEL FOUND 
l |TJJIGDAI2 | 3-67 
|IJJGSDI3 | 3-42 | 
| TJJIGSDI4 | 3-43 
| TJJGSDW3 | 3-48 
| IJJGSDVH | 3-93 4 NO FORMAT 4 LBL IN VTOC 
$$BOIS02 3 NO FORMAT & LBL IN VTOC or NO RECORD FOUND 


Figure 14 (Part 2 of 8). Master Error Message List 
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leeeage | | | | | 
[Number |M |\Chart {Volume|Message 


| odule 

l4n05I1 $$BOPEN2 1 UNRECOVERABLE I/0 ERROR 
| |1$SBOPLBL | } ol | 

| 1$$BCLLBL | ; 1 

| [$$BOSDW1 | } 2 | 

| IS$SBCCPT1 | | 2 | 

| |IJJGDARL | 3-97 4 

| ;}IJJTSRV | 2 | 

14n06I1 IJJGSDGC 3-97 4 NO STANDARD VOL 1 LABEL or NO RECORD FOUND 
142061 $S$BOISO2 3 | 

| [S$SBCISOA | 3 | 

pas 0e) $$BODIOL 2 | 

145061 $$BODIO4G bs ed 2 | 

| | 

148061 S$SBOPENG 1 

l4n07I IJJGSDRL 3-96 4 Ne RECORD FOUND 

14307I $$B35400 2 | 

144071 $$B3540I1 2 | 

l4n08D/I|S$$BOKUL1L 3-11 q NO UTLO FILE MARK FOUND or NO RECORD FOUND 
| ISSBIKUL1 | 3-5 

| 1$S$BOULI1 | 3-5 

| IS$BOULO1 [3-11. 


14608D |SsBODACL 3 
1@329D 1$6B35401 2 EXTENTS NOT EXHAUSTED 
i4n31D |IJuGspI2 | 3-41 4 [VOLUME SEQUENCE ERROR 
[43321 |s$sBoDI05 2 


IJJGSDO4 | 3- 
14433D $S$BODIO2 2 | 


14n34I IJJGSDO6 3-32 4 CURRENT FILE LBL DELETED 
[IJJGSDW3 | 3-48 
l4n36I IJJGSDNW3 3-48 4 NO MORE AVAIL/MATCH EXTENT 


2 CHAINING TO SYSTEM UNIT 


- 


143371 


| 
| 
| 
| 
| 
| 


3 USER TRL LBL IS NOT STD 
aed 4 EXTENT OVERLAY ON ANOTHER 


Figure 14 (Part 3 of 8). Master Error Message List 
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Maseaage| | | | | 
Ene. [Module IChart|Volume|Message 

ened meee | | 3 on GVERLAPS ANOTHER 

14n41D Bees | rq G LEXTENT OVERLAP ON VTOC 

| |IJJGSDO4 | 3-30] | 


ewe SS$BOISO2 
14n42D IJJGSDI4 3-43 NO MATCHING EXTENT 


3 
4 
142431 S$$BORTV1 3 INV EXTENT HI/LO LIMITS 
4 OVERLAP ON UNEXPIRED FILE 


DISCONT INDEX EXTENTS 
EXTENTS NOT ON SAME UNIT 
SYSIN/SYSOUT UNSUPPORTED 


code is still in the modules, but situation cann't 
occure anymore. 


3 
2 
142461 |$$BOISO7 e 
lan47A |IJJGSDW1 | 3-46] 4 
'4n48I |IJJGSDSF | 3-23] 4 ; 
143481 |$8B35400 2 
142491 |$$BOISO5 3 DATA TRACK LIMIT INVALID 
i4n50D ‘'IJsGSDXT | 3-34] 4 NO MORE AVAILABLE EXTENTS 
14450D |$$BODIO8 2 
lan511 |iJg6pAcx | 3-58| 4 
\@2521 | 6sBOIS05 3 
lan54I |IJJGDART | 3-68] 4 
3 


| 
wea $$BOISO5 


SYSUNITS NOT IN SEQUENCE 
DISCONT TYPE 1 EXTENTS 
DSKXTN ENTRY TABLE FULL 


WRONG PACK, MOUNT nnnonnn 


NO EXTENT FOR OUTPUT FILE 


JJGDAO1L 3-60 
JJGSDRL | 3-95] 
$B 


| 
apr Teessscoo 1 12 
143581 $$B35400 2 


ae 


1[4n581 | 


FE TT I, A A a SS TS OE SS A RS LS SE ES ES SD eS A A SS A A A I I 


‘a aay err often 


Figure 14 (Part 4 of 8). Master Error Message List 
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Message | 
Number 


lanso1 
boca 


144591 
|48591 
ponent 


4360I 
Gné61I 


4261I 
[43611 
( Ce 
| peers 

| 
142631 
eens 


ee A Ne Oe EE EY SE 


| 
14465I 
4n66D 


eee 
Cc 4n67I 


| 
| 
Van6—p 
| 


14n68D 
142691 
42701 


N 


m 
On; Orocoa;]o;o0on [O17 00}o;]; <0o/2Z2;,;O;} <o]_ aman] oOo] o0oortnnOol[( Zz; oa};}oo!]ana]ronoro 


Wk WOOTLHL iI Mi nme (| | ami ~abbeu i nm | Ot eke Pomme le | BRR Re Tee Pt we | oan dm to oUnO< bn 


3 ine PRIME DATA EXTENT 


|]Module 

IJJGSD INVALID EXTENT 
IJJGSD 

IJJGDA 

IJJGSD 

IJJGSD 

IJJGSD 4 

$$BODI 2 | 

|$$BODI 

SeB0DI 2 | 

S¢BOPE | 

I D 3-28 4 NO EXTENTS» ALL BYPASSED 
I D 3-39 

{I D 3-23 

| I D 3-46 

[I A ay 

[I A 3-61 

| I A 3-63 
eepsssor | | 2 | 

I D 3-95 4 INVALID DLBL FUNCTION 
[I A 3-57 | 

$ S 3 i 

$ T 

$ G 

$ 

$ 

$ 


fears? | [3] LOAD FILE NOT CLOSED 


| Eo INVALID HDR1i LABEL 


ree EQUAL FILE LABEL IN vTOC 


fal | TRACK USER LBL EXTENT 
a 


CVH PROCESSING FAILURE 


ot 


0 
G 
G 
G 
G 
G 
G 
G 
3 
G 
G 
0 
0 
3 
0 
0 
0 
0 
0 
0 


o 


nN 


He HHH OPH OT Om 


J 
J 
J 
J 
J 
J 
$ 
$ 
$ 
$ 
J 
J 
J 
J 
J 
J 
J 
$ 
J 
J 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
J 
J 
J 
$ 
J 
J 
J 
J 
J 
: USER LBLS EXHAUST FIRST EXTENT 


CC] CCCCO I] M/ CCC/ OW] OW oO, oO ello OO] ol COCO ool |e] COCO | oo 


D1 OMHOOD |! OO] OMG 


D 
D 
D 
p 
S 
S 
S 
S 
D 
D 
D 
5 
S 
D 
I 
R 
5 
p 
Is 
RT 
Is 
DI 
DI 
DI 
SD 
SD 
DA 
Is 
SD 
SD 
VD 
VD 
DA 
SD 
SD 


IJJGDAO2 3-61 


$$BOISO07 eee ee FILE IS OPEN FOR ADD 


}S$SBORTV2 1ST XTNT CD NOT INDX VOL 


Figure 14% (Part 5 of 8). Master Error Message List 
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Message | 


“y “Y “y 


LL ES OE ES EE SE EE SS eS A aS SS SS ES he A SS A, a A A A a TT DS SD SS NN SIT A SRSA HE PS A SN SE GAN SOTTO: NSS CstenS 
7 


Voluwalnesesoe 


Ld 
Ni > 
= oF 
Lu W - 
ad Oo LJ 
~ Ly [a4 
— as 
hm | WwW | a. 
Iio LL o 
A;~a;> oO ~< og — 
Lo) | et ed < oO La e 
ATO] as oad ~< O¢ a. «<f 
Ld f KO | << = »~< [= 4 > = 
lu | ZT kk | ~< Lid lm as Li 
=—_ire = < A oO =! 
= a | lu Liu Lh => 
Oi] a | ty k= od oO] Ho — iF LL 
Lik /] a, So bh | = om | = 
z_{i|alto = = z<—_i<« Li. al 
= LJ LL —! wn! 
mA} Ww Lad Og A Lu pi 
m | ZiN NI Lu mm | Ww) | ~ = 
=—_ | <i re — Sa) ae | _ «{ 
LJ Ww Ww Lo > < ad = 
m | Oo} pd = m= |e > «ft 
x1 SO | a ad (es } >< | bd z am) Vv) 
Wik | a fa -> iy | © = = eI 
mir i wt wT wr ric fas) wT N | wT wr 
a ad wom | heat | Oo} OM ORM MLAAN At AN LA AIM I 
iJ POTN | Por | OLN MO TMAAROMOM MON ONAN 
% oe | ie | t ] I 1/3) tet) PP bess td ne | 
& POAPMArY FE rare ft rar) tM MMmarmnm | rAMmMn | MmMy Mmmm 
O ae) ae) 
APO, na xK«~ [WN | OO fe | RE SIHSIN | ae Fwd tC IOOOOILS Fp INP | VOW AAS ™ 
O;}°O | MRE) mas] sm] eK POMS) ee Oo SEL SIMMS DMA RHORULME LT ma! ZN >| Keene R>ozl|o 
arnt wn; Aaact~pand act) al] ]aj]4wy | OOM | FPFuULneatetonatet in| wol;o!;]anad horn! w 
Ss et a NNO MM! No} wm) hon | wore) | NNENNNAAPrFPMNEAlIL NH Aan iwi nnwnea Omwwmoe | 
~|/(O ;O] mcd | cod |; co 1 OO | OCOO0O | VYEOAFr | COMOUOoOuUowMuwMlT alr oo; oOo] Muni. Ooome | © 
we) mM faa) op pep beep ) or Dow ] a7 i> 7] Ome mamnoa7 MOA 7 7YX7DBMN77 mima; «a = cmomm~7 ia 
Of mm | 9DD]L DDL VBD][LD ] COOH | OHV YONND | OHIN9N7NN7III7}7W™IAT | OL Ow | ol V7M7D7 DOD | UW 
= | mf wD | ttt tet Ret Er] OOD | OU DHE | OOM HR RAR HR | OD] Oo] oo} eRe Dr | wD 
a 
OlLetitirs| = — Qa Q | =» oe] = bt =~ 
NH nis Fs] 6] ™ TO So eo = “ 
EimIiIniS ~ ~ mops oa) oO a e) 
ZI NTN c £ c c Cc wo ¢ >@) N 
az I/risris a JT rie vT ng i Tr 


LLY ES YS A SS ES SS ES A SS ES ES ES AY SD SS ES OS IS OR RN ATS ees Oe Ao A CY MD A GE ES As OS ED OS OD ee Oe Gre MN AE GET IS Sa AR ac So, EES SO MAY coll SR AOS EE 
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| 
48881 $S$BERRTN | | 2 EOF ON SYSTEM FILE 


Message | 
eee 1M Chart|Volume!Message | 
| J | 
| J | 
| I | 
| I | 
$ 
| | 
ea | 
| $ | 
| | 
| ae | 
$$ | 
| $$ | 
] $$ | 
— | 
ao oe | 
| pads | 
| $$B | 
| i$sB | 
148851 $$BOPENC 1 SYSxxx AND SYSyyy ARE ASSIGNED TO THE SAME PHYSICAL UNIT] 
ae ae ey | 
14n86D $$BOPEN1 1 TAPE UNIT NOT READY | 
| | IJJITSRV 2 | | 
148871 $SBERRTN 2 SYS FILE EXTENT EXCEEDED | 
| 
four IJJGSDSF 3-23 4 WORKFILE NOT SUPPORTED FOR SYSFIL | 
14n90I IJJGSDVH 3-93 4G SVA EXTENT AREA EXHAUSTED | 
| |} IJJGVDOO 3-77 | | 
| |IJJGVD10 | Tee | 
| JIJJGSDFP |3-102 | 
14890I $SBOFLPT 1 | | 
14n931 |IJJGSDRL 3-96] 4 |UNRECOVERABLE I/O ERROR | 
14n94I1 IJJGSDCI 3-94 4 CISIZE INCORRECT | 
| | IJJGMIOI 3-24 | 
janet IJJGSDRL 3-96 4 CPHASENAME) NOT IN SVA | 
1SSBOSFBL 3-3 | 
| 1 IJJGMLLM ead { | 
| po TDA 3-52 | | 
| |SSBOTSVA | 2 | I 
| lIJJTSRV | | 
jsn7es legdespce | <i 4 Ferner DTFSD SYSFIL OPEN | 
14n97I IJJGDAO3 3-62 4 OVLAP EXPIRED SECRD FILE | 
| | IJJGSDO4G 3-30 | | 
14n981 IJJGSDOG 3-30 4 OVLAP UNEXPRD SECRD FILE | 
| | IJJGDAO3 3-62 | | 
14n99D re oueSnie | aa G ren SECURED FILE ACCESSED | 
| lIIJJGDAI1 | 3-66] ] | 


Figure 14 (Part 7 of 8). Master Error Message List 
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Gace | Moduits Chapel veluee moLouee 
[anon IJDPRT | | 2 [INVALID ASA CONTROL CHAR nn filename SYSxxx 
1G4HO2I | IUDPRT 2 PRTOV USED BUT NO PRINTOV SPECIFIED filename SYSxxx 
\@HO3T. |IJDPRT 2 CNTRL USED BUT NO CONTROL SPECIFIED filename SYSxxx 
1GHO4I |IJDPRT 2 PHASE IJDPRT INTERNAL ERROR RC=nn filename SYSxxx 
IGHO5I  |IJDPRT | 2 [INVALID RECORD LENGTH filename SYSxxx 
14HO6I | IJDPRT | 2  |DTF INCORRECT RC=01 filename SYSxxx 
IGMR1I  |MRMOD 2 EXTERNAL INTERRUPT I/Q ERROR filename SYSxxx 
I4MR2I  |MRMOD a: SCU NOT OPERATIONAL filename SYSxxx 
(@pol1 |66BERPTP | [2 \DATA CHECK SYSxxxscuu 


(Geceoevsenet [| 2 [oATa cvece s¥seaxeevs 
|\4¢P02D SSBERPTP DATA CHECK SY¥Sxxx=cuu 


2 
4vo31 $$BODSPW P| 1 NO RECORD FOUND filename SYSxxx 
i4v04I  |$sBODSP 1 


OPS A SNS TG AT AE ET SD LL TY NS NR NY ATA SE aS A CS A SE CETTE CS CE CE ce er Sr ey) A ee ee ee a Ge GS a 


W NO RECORD FOUND filename SYSxxx,; or 
| |$S$BOVDMP | | INO FORMAT & LBL IN VTOGC filename SYSxxx 
[4VO6I S$SBOVDMO 1 NO STANDARD VOLUME LABEL filename SYSxxx 
| |SSBOVDMP | 
14V09I SSBODSPW 1 NGO RECORD FOUND filename SYSxxx 
| !S$S$BOWDMP | { 
14Vé67I IJJGVDOO0 3-83 G CVH PROCESSING FAILURE 
| [IJJGVD10 | 3-90] 
[4V95A SSBODSPV 1 SYSLOG OR SYSLST 
!}IJJGVD10 3-85 | 4 | 
I4V96A SSBODSPV 1 SYSLST NOT A PRINTER 
| {IJJGVD10 | 3-85] 4 ! 
|P200I SSBOPR3 2 3800 PRINTER EXTENDED BUFFERING MODE NOT USED 
| | | | | REASON CODE = nan 


Figure 14 (Part 8 of 8). Master Error Message List 


Note: A- and D- type messages are not issued by the B-transient message 
writer. The respective message writers call $SBOMSVA which in 
turn transfers control to the SVA message writers in order to 


issue the message from the SVA. 
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ASCII to EBCDIC Correspondence (0/0 to 3/15) 


EBCDIC 


Bit Bit 
| o | o | oo | oo | | 
0000 0001 a < 
| TC STX CCT CCE 0000 po: 2 | 0000 | ~SCot0s§$_ CSOT 
pC ETX CCT OT 0000 po |, 3 | Oooo =p ST Ss 
Pp CEOTC“‘(‘$SSWSSCSOO)SC‘CdCL"s(«iAA'sCSd 0000 Peed pee OOM eg OWN, | 
Pe es 0000 ee oD 0010 ION ee | 
Po CACK CUT HM eT EO 
Pp EK ($C(SCS| CO) tT 7 fot ot to et 
| SC CC et “att dé ot Sotto “a 
I | A RO: en Le, I <¢) ON = Ue, ) (¢h 
Pp oC HP tO 2 5 OT 
v0 0000 La RY 
| ee ee ee 0000 1100 a a 
ees (eee ee ee 0000 1101 a ae a (es | 
ee SO |. Oe 0000 1110 fede ee OOOO gk NO Se aT 
pC CE St 
PEC tt oT “ae —( eT 
PCT CC tot oot et ot ot ase 
SS oy Ss On 2 © e+ | nD 0 ( 0001 0010 ae 
pC tt ET 8 os ot G8 0001 0011 ees 
pee ___f tt 4} soo) __,__ ggg} 3 yc a ef 
NAK pi yj 5 [|  oo71 | oni [| 3 3) D [ oo Jj or | | 
Pp SYN CUT Ts Ct tos “$“ eT 2 fo | tC $e 
| CBR CT 7 ft eo a ot ag ot $e 
Po CCUCANT CT ct oot 000 8 oT gH} | 
a | ee POO 00 Too gto se 
aaa ey Poon Ett “ae oot 
sep 0001 to 2 7000 Oi te 
a ee a F- K|* +) GU C+, I GO OR 0001 1100 Oe gS og zee aed 
Gs 0001 l 10 Wie fee ae | 
ee en fae et tees 2 
ae ees ee ee ee nee ed 
i = SP | 2 feet oe ee oe 
ae eee ee ee | Logical OR 
fe erage 
ee SR (a A ae geet ne cine 
ees eee eee. Be Eo ee | 
a ee ee ee ea ie ee 
Pr CUSt—“—si‘<‘iESC“‘( ] ae 
a reas ae ee ry eel ee 
PCC tt to et too ae to SP 
Pl) oto too 5 Foto to 
ee te PO. P0010 OI ST ONO 00: 
ie ee | 0010 1011 Se ee eee 
ae eae ae 12 0010 1100 6 B {| ono, 
ere eae 0010 Wot_[ 640 | _o110___ + 0000] “Hyphen, Mins 
ee ee a 0010 ‘ 4B | ono ory C—C~—sSSCSCS 
ae Saeewes es 0010 inn Pp 6@ yy 1 foto to ae 
P| 0 001 0000 0 A P0000 
| oorns—s“— «$s S|. (<$sST OF OU] TC] Coots ae 
UE 
| oot) § SF ot a ) be 
F 4 [unt ow 
——— 
F 6 111 0110 fe ae eS cn al 
a a ee ee 0 ee 
a a a ee es ee ee 
Foy 9 [| i Toons §s | 
7 yy A Tom t0—“_ 
es es 
ee ee 
Pp 7, — [| on 
6 E Q110 
eo Olio. t ae 


Figure 15 (Part 1 of 2). ASCII to EBCDIC Conversion 
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ASCII to EBCDIC Correspondence (4/0 to 7/15) 


ee 
Character Col | Row Rattekn Pattern Comments 
: 
@ | o100—I|_—_—onan ai 
A wens 0100 0001 100 «T  oons—is|s C™~C~—S 
B 4 2 | ooo 0010 Cc 2 1100 Tool0f| 
C 4 3 0100 0011 pc ff 3 hf too TT cot 
eet: eae ie 4 {[_owo | oo | c ! 4 [| io [oo fT 
I 
F | 6 | omoons— aes; SC ot—“§esCSad?; |] CT cf} hf to eT t— #$EST 
Po GT a Zt ot oor 
eg oS 0100 1000 PCy B00 1000 
Ht, 4) 8 0100 __1001 —————————— 
eee 0100 I 1010 A 
ae eee ee ae 0100 1011 | Db TF 2 {ior Toto sf 
0100 1100 Pp ob ft 3 for Toor 
PM oto or 00 
PN aa toons 5 or 
Po COC TK tp or oto 
a ea es es = |) re +) (nT 
fe Or ee a | 0101 0001 oy 8 tf or T0000 P 
ae See ae oe 0101 0010 ae 
ee ee 0101 0011 PoE [ 2 f mo | oot0n PT 
Po TtC“~*d:SC SY tT 0100 Poe yy 3 fo OTT 
po 8 ot to et a to 
E 5 1110 [0101 
PwC TT to ot et 6 1110 0110 
Po KU 8 to 000 
af ett ig oe 
5 10 | Cos $e Ft § eT 
5 Wey omor Eto A 0100 1010 Pa 
5 12 | olor oT toons | Eo 1110 [ _0000 Reverse Slont 
0101 1101 5 A | oir =| ~~ SET C—Ci‘Cis*zS 
0101 1110 5 Ff oor | a TT Leogical NOT _| 
po ef 0101 Wn P 6 | Db f ono |; ol TU nderscore 
ar eee) (ae 0110 0000 | 7 J 9 | our | 001d Grave Accent _ 
Po lTt—“C~sTSCC YT tt oot a ooo tC(sti‘“‘:;CSsC*dr 
po orto oto et tooo oto 
Po CU fot cot i 8 tooo oot 
aaa em aa Ono 0100 8 4 1000 0100 ence 
er ees ie Se ee 0110 0101 a ar ee 1000 [0101 inet ete 
PA a ot otto tooo ott 
| ONO On 8 000 ft i 
PoC CU TT eT t—“$=$e Ts 8 8 1000 1000 -——.-— 
PC ti‘ CG fT U9 [Ot ag tocot—s§$§ §s | 9 |1000 1001 
PC toto toon 1001 0001 aaa 
Po eT 8 00 PT 
Pp Pt orto too too "sco 
eT ee ee ONO 2-4 1101 p 9 Fa {oor foto ef 
42 +. 6 | 0110 1110 | 9 to 5 ff joot tot 
ee es 15 p00 fe 6 1001 J 0110 ae ery 
Po lcpTTTTCdE | Oot 0000 1001 oun [ere eee 
ET es nS NO *) hk ¢) (OD; OC ¢) [NO (0 
cea 2M ee AGS om 0010 po Fg toon tT 
ee | on 0011 
Po tC CZ ot to a toto co 
Pow or tot A toto toon 
poe ty fe a 1010 0101 po 
Pow ot om A é 1010 o110 
ae res ae: 8 onl 1000 At 7? 1010 ol ee 
Lease rein (ialbe 9 ont 1001 A ae {| iio i  T  iooo ff 
ee 10 Om 1010 Pp A [| 9 | lo | ONT 
ae aay ae n 1100 0000 ieee 
ees ees ee Be | 6 y A | | Vertical Line | 
ae ees ie es ee ae ee eR a Need 
| Tilde 
DEL 7 15 (ee eae ell 


Figure 15 (Part 2 of 2). ASCII to EBCDIC Conversion 
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EBCDIC to ASCII Correspondence (X'00' to X'82") 


EBCDIC ASCII 


Character i" Col | Row ' Comments 


Tr 5 | 0000 \ 1010 

ear a 0001 on 
P22 oy 7 J otto et co ston 

f 2) D [| oolo |, ol | oO | 5 | 0000 0101 

pode LES 0010 1110 | o 7; 6 | 0000 0110 
ae ee 0010 Mi 
[3 tT 2 [oon toss» | lo otto 
-——tor_} 3 [7 foo ot fo J _4 | __o009__,__o100_] 
0011 1100 Poly 4 foot toss 
Nae a oe coon So so oto =e 
ST) Ss Ge 


a cee a ae ae | 0010 gy 0000 
| 4 7 A | on 

a ee ee [| ootg)s—s Ft 

4 Poort tio 

4 
eh a 

Polo 0001 


a a: 
6 010 | ———— 
7 9 | om | wore [6 | o 7~ otio T0000 | Grove Accent 
ap oll 1010 rT 3 | 10 | oon tv 100 | 
7 8 ou oll 
P77 'oc J omy tt000s— ss 4 oh to— 
Porm ot ttt 7 [| ooo Tom 
ae a ee es ee i3__| ool T no | 
Pp tC MC ed? Tf ott Tt 2 JT 2 fotos | tons 
| 6 {| i f{[ too | oo | fT onldS—T STC G$SCSt 
| & yy 2? | A 


Figure 16 (Part 1 of 2). EBCDIC to ASCII Conversion 
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EBCDIC to ASCII Correspondence (X'83' to X°F9"') 


EBCDIC 


Character p Comments 
attern 
a ee ee ee ee Pe etl 
ee es ee [| _-ilooo-—‘“NC ClO CF a 
ee eee ee 1000 0101 f siszr 
es a ee 1000 O10 feteee Aas aoe 
SS ec 4 
a 
Po 000 tos st 9 {| ono | 1001 a 
elon 00h wee to] OND a aes 
a See Ma en Sea Bees | i ie A LS AE a 1 Ea CE 
es ey 3 1001 0011 ST  ————— 
er ee 4 1001 a ee 13 | ono FF to 
ee eee ee: 5 [| oor | ~=—rovot—(§$a(“‘(id]:s  ) A TC $= to ($e T 
Pcl TTt™t—“—é‘~dTSC too gS ott—“s et Cott ($e tt 
pe noe om 
ec A) CSG, AN es 1 a 
rr ee ee 00 ed a de aa 
Pp lO A J toto eo §S S| ta tt td Tile 
pols A 2 ft otc et tt ot 
a aa ee” a | °) | | (ee A On 0100 ft 
Pcl t—“<—~é~dSC A a tot tons gy 8 to § se F 
Pol A 8 tots <= a i ot ott 
Pll CC CA toto sotto es ot ot 
Sr Se ee. se (+ 1+ U0 GA on 1000 eRe 
ma (1 (  l  ( 
pet | A NO 00? to J ont tT se 
ee es 0 a ee oe — | 
toe 
a ee ee ee ey 1100 0010 Pp 4 yy 2 fT 
a ees ea ee 1100 ool oA pe 8 O00, OOM es 
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Figure 16 (Part 2 of 2). EBCDIC to ASCII Conversion 
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APPENDIX C: DASD AND TAPE LABELS 


This part contains information formarely provided in Chapters 2 and 3 of 
$C24-5212 (VSE/Advanced Functions Tape Labels) and SC24-5213 
(VSE/Advanced Functions DASD Labels}. 


LABEL PROCESSING FOR SAM AND DAM FILES ON DASD OR DISKETTE 


This section summarizes DASD label processing performed for sequential 
(consecutive) and direct access files. Processing performed for ; 
standard format-l and format-3 labels, and for user-standard labels is 
described under the headings "Input File™ and "Output File.” =This 
section also describes diskette label processing. Processing performed 
for standard HDR1 labels is described under the headings "Diskette 
Files: Input File™ and "Diskette Files: Output File." 


SAM AND DAM INPUT FILE 


VOL1 Label 


The standard volume label (VOQL1) must be on cylinder Q, track OG, record 
3 for CKD devices, and in block 1 for FBA devices. If it is not, the 
job is canceled. 


The VOL1 label, written by the IBM-supplied program for initializing 
disks, contains a permanent Volume Serial Number. 


Whenever a logical file is to be processed, IOCS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
statement. For a multiextent, or multivolume multiextent file, IGCS 
performs this check for each EXTENT. If an error is detected, a message 
is issued to the operator. The operator may mount the correct volume 
and continue processing or he may terminate the job. 


If you use EXTENT and omit the Volume Serial Number, IGCS checks the 
Volume Serial Number against the serial number, of the previous EXTENT. 
If there was no previous EXTENT, IOCS assumes that the correct volume is 
mounted and does not check the VOLI1 label 


For a multivolume SAM file, only one extent is processed at a time, and 
thus, only one volume need be mounted at a time. 


For a multivolume DAM file, all extents Cand therefore all volumes) are 
opened before any data records are processed. Thus, all volumes 
containing the file must be on-line ready at th2 same time. 


IOCS determines the location of the VTOC from the Data File Directory 
field of the VOLI1 label. 


If any additional volume labels (VOL2-VOL8) follow the VOL1 label, I0CS 
ignores them. 


Format-l Label 


You must supply one DLBL or DLAB statement for the logical file to be 
processed, and one EXTENT statement for each separate area (extent) that 
the file occupies on the volume. The EXTENT statement may be omitted 
for a SAM file if the file is on a single volume and the DTF DEVADDR 


entry is included. 


If you use EXTENT for a ingle volume file and omit the Symbolic Unit 
field, IOCS uses the Symbolic Unit of the preceding EXTENT. If there is 
no preceding EXTENT, the Symbolic Unit specified in the DTF is used. If 
you also omit Symbolic Unit in the oes you get an error message. If 
you use EXTENT for a multivolume SAM file, you must supply, for each 
volume, at least the Pee Aah statement containing the Symbolic 
Unit. In a multivolume DA you must supply a sequential set of 
Symbolic Unit numbers in EX EN for the volumes required. 
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I0CS locates the format-1 label of the file to be processed by first 
reading the address of the VTOC in the VOL1 label and then searching the 
VTOC for the format-1 label that contains the File Identification that 
you specify in DLBL The File Identification (field K1) was written in 
the key area of the label record when the file was created. Thus, you 
must specify the same identification now as you did when the file was 
written as an output file. 


If you _ use DLBL and omit the File Identification, I0CS searches for the 
Sepa in ee oe by using the DTF name that you specify in the DLBL 
ilename field. 


For label fields D1-D21, IOCS OPEN routines check the appropriate fields 
against the corresponding information supplied by you in DLBL or in a 
DTF specification. Some fields provide information that is required 
during the processing of data, and other fields are not required by VSE 
and are ignored. See "Section Label Fields™ (Figure 20 on page 105 and 
Figure 21 on page 1907) for the details about each field of the label. 


Label fields D22-D25 define the area (extent) of the volume where the 
data records are located Cif user-standard labels have not been written 
for the file). The extent is one continuous area, and these fields 
contain the lower limit (starting address) and upper limit (Cending 
address) of the area. They also contain a code for the type of records 
written in the area, and they provide the order in which this extent 
Should be processed ina multiextent file. 


If a file is scattered over separate areas (extents) of the volume, a 
separate definition is required for each extent. Fields D26-D29 define a 
second extent in the same way as fields D22-D25 define the first. Fields 
D30-D33 define a third extent. 


If user-standard labels have been written for the file, IOCS previously 
established an area for them (the first track of the first extent 
specified for data records) and defined that area in the first Extent 
field (D22-D25). In this case, the second Extent field (D26-D23) 


defines the first area that contains data records. 


In a SAM file, IOCS checks the starting and ending addresses you supply 
in EXTENT statements (for the data records) against the lower and upper 
limits in the corresponding Extent field of the label. If your 
specifications equal or fall within these limits, IOCS makes the area 
you specify Cin EXTENT) available for processing. If not, a message is 
issued to the operator. If you omit EXTENT, IOCS does no checking and 
makes available the area defined by the label. 


If you have a multiextent SAM file, JOCS checks your second EXTENT 
statement information against the second Extent field (€or third with 
user-standard labels).IOCS performs this check after all the data 
records in the first extent have been processed, and then makes the 
second area available for processing. 


If you have a multiextent DAM file, IOCS makes all the areas you specify 
in ae statements available at the same time, when the file is first 
opened. 


If more than three Extent fields are used, IOCS reads the Pointer field 
ee) ane searches for the format-3 label that defines the additional 
extents. 


For a DAM file, you can determine the exact areas of the volume that 
were specified when the file was created by including the DTFDA entry 
SXTNTXIT=Name and supplying an extent-processing routine. IocS branches 
to your routine after each EXTENT statement is processed. IOCS stores, 
in register 1, the address of the 14-byte field that contains the 
information from the Extent field of the label that corresponds to the 
EXTENT statement just processed. From this field you can obtain, for 
example, the lower and upper limit of each extent, and save them to 
check the address of data records. At the end of your routine, return 
control to IOCS by issuing a LBRET macro instruction. 


If you include the DTF LABADDR entry to indicate that user-standard 
labels are to be processed, IOCS branches to your label routine after 
processing the standard labels. At the end of your routine, return 
control to IOCS by issuing a LBRET macro instruction. 

You can control the processing of any remaining label fields by the 
operand in the LBRET instruction. A LBRET 3 instruction permits IOCS to 
update (rewrite) the label read and pass you the next label; a LBRET 2 
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instruction permits the processing of another label; a LBRET 1 
instruction terminates the processing of user labels. 


Format-3 Label 
If more than three extent fields were required when the file 


wa 
created, I0O0CS set up and created a format-3 label for the Sddi tioned 
extents. 


On input, IOCS searches for the format-3 label when it reads another 
EXTENT after the third extent of the format-1 label has been processed. 
IO0CS reads the address of the format-3 label from the Pointer field 
(D34) of the format-l label. 
For a SAM file, IOCS searches for a second format-3 label if it reads 
another EXTENT after the 13th extent of the first format—-3 label has 
agate processed. IOCS reads the address of the second format-3 label 
from the Pointer field (D38) -of the first format-3 label. 


A DAM file permits the use of only one format-3 label. 


IOCS processes the extent fields of the format-3 label in the same 
manner as those in the format-l label 


User-standard Label 


When user-standard labels CUHL/UTL) are to be checked and logical [OCS 
macros are used for the file, DTF LABADDR=Name must be specified. If it 
is not specified, IOCS bypasses all usSer-Standard labels. 


When physical IOCS macros are used for a file and DTFPH is specified, 
LABADDR=Name must be included if user-standard header labels CUHL) are 
to be checked. IOCS does not provide for user checking of user-standard 
trailer labels CUTL) with the DTFPH. 


For a SAM file, IOCS provides for checking user-standard ‘header labels 
after it checks the standard VOL1 and format-I1 labels. In a multivolume 
file, IOCS provides for checking user-sStandard header labels on each 
volume when that volume is ready to be processed. 


For a DAM file, [OCS reads the user-Standard header label after it 
checks the standard VOL1 and format-1 labels of a single-volume file and 
makes the label available to you. In a multivolume file, IOCS processes 
all labels when the file is initially opened. 

At that time, IGCS checks the standard VOLL and format-1l labels on the 
first volume, and then reads the user-standard header labels on the 
first volume, and makes the label available to you. 

Next, IOCS checks the standard labels on the second volume and reads 
the user-standard header labels on that volume. Label processing 
progresses in this manner through all on-line volumes, before any data 
records are processed. 


IOCS provides for user checking of user-standard trailer labels on an 
end-of-volume or end-of-file condition. IOCS indicates the status of 
the file through the low-order byte in register QO. The indication is O, 
V, or F3 meaning open, end-of-volume, or end-of-file, respectively. 


The input file (such as a card reader) that contains the user's 
information for checking user-Standard labels must be opened before the 
file with the UHL labels. This is done by specifying the 
label-information file ahead of the labeled file in the same OPEN 
instruction, or by issuing a prior, separate OPEN instruction. 


IO0CS identifies the user-standard labels by UHL or UTL in the first 
three bytes of the label. 


IOCS reads each user-Standard label, one at a time, from the partition 
GETVIS area. IOCS supplies the address af the area into which the 
labels are read in register l. 


After a label is read in, I0CS branches to your label-checking routine. 
The same routine (specified by DTF LABADDR=Name) is used for checking 

both user-standard header CUHL) and user-standard trailer CUTL) labels. 
You can identify the type of label by the UHL or UTL in the first three 


Positions of the label itself. 
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After you check a label, return to IOCS by issuing a LBRET macro 
instruction. You control the checking of any remaining user-standard 
labels by the operand in the LBRET instruction. A LBRET 3 instruction 
permits IOQCS to update (rewrite) the label read and pass you the next 
label. A LBRET 2 instruction permits the checking of another label. A 
LBRET 1 instruction or an end-of-file record terminates label checking. 


If the user, or an end-of-file record, does not terminate the label 
checking, IOCS reads in the next user-standard header label. 


SAM AND DAM OUTPUT FILE 


VOLi Label 


The standard volume label (VOL1) must be on cylinder O, track O» record 
3, or in block 1 for FBA devices. If it is not, the job is canceled. 


The (VOL1) label contains a permanent Volume Serial Number. 
IOCS neither rewrites nor alters the VOL1 label in any way. 


Whenever a logical file is to be processed, I0CS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
statement. For a multiextent, or multivolume multiextent file, IOCS 
performs this check for each EXTENT. If an error is detected, a message 
is issued to the operator. The operator may mount the correct volume 
and continue processing, or terminate the job. 


If you use EXTENT and omit the Volume Serial Number, IOCS checks ag 

the number of the previous EXTENT. If there was no previous EXTENT 

Nae eee ence that the correct volume is mounted and does not check 
abel. 


For a multivolume SAM file, only one extent is written at a time, and 
thus only one volume need be mounted at a time. 


For a multivolume DAM file, all extents Cand therefore all volumes) are 
opened before any data records are written. Thus, all volumes that will 
contain the file must be on-line and ready at the same time. 


IOCS determines the location of the YTOC from the Data File Directory 
field of the VOL1 label. 


If any additional volume labels (VOL2-VOL8) follow the VOLI1 label, IOCS 
ignores them. 


Format-l1 Label 


» and one EXTENT 


You must supply one DLBL statement for the logi l 
e will occupy on 


gic 
statement for each separate area (Cextent) that t 
the volume(s). 


An EXTENT statement defines the area Cextent) of the disk pack where the 
data records are to be written. For a CKD device, an EXTENT statement 
provides the starting address (relative track? and the number of tracks, 
which indirectly gives the ending address of the extent. For an FBA 
device, an EXTENT statement specifies the address of the physical block 
pS ae the extent begins and the number of physical blocks within 

e extent. 


An EXTENT statement also contains a code for the type of records that 
are to be written, and provides the order in which this extent should be 
processed ina multiextent file. 


If you use EXTENT for a single volume file and omit the Symbolic Unit 
field, I0CS uses the Symbolic Uni of he preceding EXTENT. If there is 
no preceding EXTENT, the Symbolic Unit specified in the DTF is used. If 
you also omit Symbolic Unit in the DTF, you get an error message. If 


you use EXTENT for a multivolume SAM fi you must supply, for each 
volume, at least the first EXTENT statement containing the Symbolic 
Unit. In a multivolume DAM ihe you must supply a sequential set of 
Symbolic Unit numbers in EXT or the volumes required. Also, ina 
multivelume pan file a separate physical device must be assigned to each 
symbolic unit. 


file 
file 
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If a file is to be scattered over separate areas (extents) of the disk 
pack, a separate EXTENT statement is required for each extent. In that 
case, the same Symbolic Unit number must be used. 


Iocs first validates the EXTENT statement specifications: 
1. The extents must not overlap each other. 


2% If user-standard labels are to be written (specified by DTF 
LABADDR), the first extent must be at least two tracks. 


3. The valid extent types for a SAM file are: 
1 - data records 
8 - data records with split cylinder, in EXTENT Cnot valid for FBA) 
128 - data records with split cylinder, in XTENT (not valid for FBA) 
4. The valid extent type for a DAM file is 1 (data records). 


Ee For a DAM file, the maximum number of EXTENT statements is 15 if 
user-standard labels are specified, or 16 if they are not. 


eo routines locate the VTOC by reading its address in the VOL1 
abel. 


IOCS checks the limits of an EXTENT against the limits of each extent 
field of each label already written in the VTOC. If the new extent 
overlaps any previously written extent, IOQCS checks the expiration date 
of the old file to ensure that the data records are no longer active. 


If the expiration date has passed, [GCS deletes the old label(s) by 
setting the File Identification Field of the format-1 label to binary 
zeros, which, in effect, removes the expired file from the volume and 
makes a record in the VTOC available. A format-3 label associated with 
the expired file is deleted at OPEN time along with the format-1 label. 


If the expiration date has not passed, a message is issued to the 
operator. The operator can delete the unexpired file and continue 
processing, bypass this EXTENT» or terminate the job. 


IOCS reads the format-4@ label (first record in VTOC) to determine the 
limits of the VTOC. 


IO0CS searches the Key Identification Field (K1) for zeros, which 
indicate an available location. IO0CS checks this location to verify 
that it is contained within the VTOC limits, and then writes the 
poe label. The process is repeated if a format-3 label is 
required. 


For label fields Kl and D1-Del 


of t t-1 label, IOCS writes the 
information supplied by you in DLBL 
Fiel 
a 


entry, or generated by 
re 20 on page 105 and 


the system. See "Section Label u 
t each field of the label. 


ma 

re a 

(Fig 
Figure 21 on page 107) for the det abou 
If you use DLBL and omit some specificati 
default values (see Figure 21 on page 10 


Label fields D22-D25 define the area (Cextent) of the volume where the 
data records will be written. IOCS writes these fields from the first 


cue IOCS writes predetermined 


eee statement Cif user~-standard labels are not specified for the 
ile). 

If a file is to be scattered over separate areas (extents) of the 
volume, a separate definition will be required for each extent. Fields 
D26-D29 are used to define a second extent, and fields D30-D33 to define 
a eee These fields are written from additional EXTENT statements you 
Supply. 

If user-standard labels are written for the file (specified by DTF 
LABADDR), IOCS establishes an area for them (the first track of the 
first extent you specify for the data records) and defines that area in 
the first extent field (D22-D25). In this case, IJOCS writes your first 
eave ee ie information for data records in the second extent field 
re) e label. 
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After writing the label(€s), IOCS makes the area(s) of the volume 
available for writing the data records. In a SAM multiextent file, IOCS 
makes only the first specified extent available. 

After that extent is filled, IOCS makes the next specified extent 
available. In a DAM multiextent file, IOCS makes all the extents 
available at the same time. 


If you include more than three EXTENT statement 
labels, or two with user-standard labels), [GCS 
and writes the address of that label in the Poi 
format-1 label. 


If you include the DTF LABADDR entry to indicate that user-standard 
labels are to be written, IOCS branches to your label routine prior to 
Writing each standard label. 


Cwithout user-standard 
rites a format-3 label, 
er field (D344) of the 


Ss 


Ww 
nt 


Format-3 Label 


If more than three Extent fields are required for the file, IOCS sets up 
a format-3 label for the additional extents. 


On output, IO0CS writes the format-3 label when it reads another EXTENT 
statement after the three Extent fields of the format-1l label have been 
filled. IO0CS writes the address of the format-3 label in the POINTER 
field (D34) of the format-1 label. 

For a SAM file, IQCS writes a second format-3 label if it reads another 
EXTENT statement after the 13 Extent fields of the first format-3 label 
have been filled. IOcS writes the address of the second format-3 label 


in the Pointer field (D38) of the first format-3 label. 

A DAM file permits the use of only one format-3 label. 

I0CS processes the Extent fields of the format-3 label in the same 
manner as those in the format-l label. 

User-Standard Label 


When user-standard labels are to be written for a file, DTFSD, DTFDA, or 
BDTFPH LABADDR=Name must be specified. 


Whenever LABADDR=Name is specified, at least one UHL label and one UTL 
label will be written. 


For a SAM file, IOCS writes user-standard header labels after it writes 
the standard file labels. In a multivolume file, IQCS writes 
user-standard header labels in each volume. 


For a DAM file, IOCS writes user-standard header labels after it writes 
the standard file labels of a single-volume file. In a multivolume 
file, IOCS writes all labels when the file is initially opened. At that 
time, IOCS writes the standard file labels on the first volume, and then 
Writes the user-standard header labels on the first volume. Next, IOQCcS 
writes the standard file labels in the second volume and writes 
user-standard header labels on that volume. Label processing progresses 
in this Tonver through all on-line volumes, before any data records are 
processed. 


IocS writes user-standard trailer labels on an end-of-volume or 
end-of-file condition. I0cS indicates the status of the file through 
the low-order byte in register Q. The indication is O, V, or F3 meaning 
open, end-of-volume, or end-of file, respectively. 


The input file (€such as a card reader) that contains the user's 
information for writing user-standard labels must be opened before the 
file on which the UHL labels are to be written. To do this, the input 
file must be specified before the file to be labeled in the same OPEN 
instruction, or a prior separate OPEN instruction must be issued. 


The user must build each user-standard label. To provide for this, IO0CS 
branches to the user's label routine. The same routine (specified by 
LABADDR=Name) is used for building both user-standard header labels 
(UHL) and user-standard trailer labels CUTL). IOCS supplies a code in 
Se ee byte of register Q to indicate which type of label should 
e ui : 
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UHL - Code O Cletter Q) 
UTL - Code F for end-of-file condition 
Code V for end-of-volume condition 


You must establish an 80-byte area to build your labels, and you must 
load the address of that area in register QO. 


When building the label, you must include UHL or UTL in the first 3 

bytes of the 80-byte data area followed by a digit 1-8 in the fourth 

evi: You may include whatever information you need in the remaining 76 
ytes. 


After building a label, you return to I0OCS by iSsuing a LBRET 
instruction. IOcS then writes the label on the volume. 


You control the building and writing of successive user-standard labels 
by the operand in the LBRET instruction. If another label is to be 
written, specify operand 2 and IOCS again branches to your label 
routine. When you have built you last user label, issue the LBRET macro 
with the operand 1. IOCS writes the last label. 


A maximum of eight user-standard header and eight user-standerd trailer 
labels may be written. After eight labels, I0CS terminates the label 
Writing, regardless of the LBRET macro instruction. 

Each user-label set Cheader or header and trailer) is terminated by an 
end-of-file record, which is a data record with a data length of Q. 


DISKETTE FILES: INPUT FILE 


VOL1 Label 

The VOL1 label is on track QO, record 7. 

Whenever a logical file is to be processed, [OCS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
statement. For a multivolume file, IGCS performs this check for each 
EXTENT. If an error is detected, a message is issued to the operator. 


The operator may mount the correct volume and continue processing, or he 
may terminate the job. 


If you omit the Volume Serial Number, I0QCS assumes that the correct 
volume is mounted and does not check the VOL1 label. 


For a multivolume file, only one extent is processed at a time. Iocs 
automatically feeds between volumes of a multivolume file. 


The VTOC on a diskette is always on track O, records 8-26. 


HDR1 Label 


You must supply one DLBL statement for the logical file to be processed, 
and one EXTENT statement for each volume on which the file is contained. 
One exception exists to this: the EXTENT statement may be omitted if the 
file is on a single volume and the DTF DEVADDR entry is included, 


If you omit the Symbolic Unit field on the EXTENT statement of a single 
volume file, or on all EXTENT statements of a multi-~volume file, I[I0CS 
uses the Symbolic Unit specified in the DTF. If you also omit Symbolic 
Unit in the DTF, you get an error message. All symbolic unit fields 
provided on the EXTENT statements must be identical. 


IOCS locates the HDR1 label of the file to be processed by searching the 
VTOC for the HDR1 label that contains the File Identification that you 
specify in the DLBL. The File Identification (field D4) was written in 
the label when the file was created. Thus, you must specify the same 
identification now as you did when the file was written as an output. 
See "Section Label Fields" (CFigure 32 on page 136 and Figure 33 on 

page 136) for the details about each field of the label. 


If you omit the File Identification, IO0CS searches for the label in the 
VTOC, using the DTF name that you specify in the DLBL Filename field. 
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Label fields D&, D110, and D23 define the area (Cextent) of the diskette 
where data records are located. These fields contain the lower limit 
(starting address), the upper limit Cending address), and the 
end-of-data address (address of the last record in the file +1). Files 
With multiple extents on a single volume are not supported on diskettes. 
ace enone: any starting and ending addresses you supply on the EXTENT 
statement. 


For multivolume diskette input files using DTFDU, the EXTENT statements 
and the multivolume indicator are used in conjunction by the OPEN 
transients to determine When end of file has occurred. If three extents 
were provided by you, the multivolume indicator combinations shown in 
Figure 17 could occur. 


Multivolume.indicator Action taken by OPEN transients 
Process first volume and issue warning message. 


L, anything No volumes are processed, permanent-error messa 
issued. 


Process first volume; the b indicates that no 
further volume checking is to be done. 


message because the file was not found. 


C, L, anything Process through the "L"™ and issue warning message. 


Process through the number of extents. No message 
is issued. 


Process through the "L." No message is issued. 


Figure 17. Multivolume Indicator Combinations (3 Extents) 

In summary, for DTFDU the number of diskettes can be less than the 
number of extents provided. 

For all other supported DTF's, processing continues until the number of 


extents is exhausted. Regardless of the DTF type for system files, 
Processing continues until all extents are exhausted. 


DISKETTE FILES: OUTPUT FILE 


VOL1 Label 
The VOL1 label ts on track O, record 7. 


IOCS will update the accessibility indicator (field D4&) to an 
"S"uhenever a secured file is created on the volume. 


Whenever a logical file is to be processed, IOCS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
statement. For a multivolume file, IOQCS performs this check for each 
EXTENT. If an error is detected, a message is issued to the operator. 
The operator may mount the correct volume and continue processing,» or he 


may terminate the job. 


If you omit the Volume Serial Number, IOCS assume 
a 


that the correct 
volume iS mounted, and does not check the VOL1 1 ls 


s 
be 
For a multivolume files only one extent iS written at tim 
automatically feeds from the one volume of a multivol fi 


next. 


a e. Iocs 
ume le to the 


The VTOC on a diskette is always on track O, records 8-26. 
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HDR1i Label 


You must supply one DLBL statement for the logical file, and one EXTENT 
statement for each volume on which the file is to be written. 


If you omit the Symbolic Unit field on the EXTENT statement of a single 
volume file, or on all EXTENT statements of a multi-volume file, [0CS_ 
uses the Symbolic Unit specified in the DTF. I you also omit Symbolic 
Unit in the DTF, you get an error message. All symbolic unit fields 
provided on the EXTENT statements must be identical. 


The extent limits for the file are determined by IOCS from available 
space on the diskette, and any extent limits provided by you on the 
EXTENT statement are ignored. 


The name of the output file to be created is the same as the File 
Identification you specify in the DLBL statement. If you omit the File 
Identification, the name will be the same as the DTF name that you 
specify in the DLBL Filename field. 


If the name of the output file to be created is equal to that of an 
unexpired or write-protected (field D114) file already present on the 
volume, you will get an error message and the job will be canceled. You 
Will not be allowed to request that the duplicate file Cunexpired or 
write-protected) be deleted 


If the duplicate file is expired and not write-protected, or if a 
duplicate file is not being created, [OCS will allocate space for the 
file starting at the track following the end of the last unexpired or 
write-protected file on the volume, and ending at the end of the volume 
Ctrack 73, record 26). If expired and non-write-protected files are 
overlapped by this allocation, their labels are deleted from the VTOC by 
writing delete records in their location in the VTOC. 


If there is not at least one track of space available on the volume, you 
will get an error message and the job will be terminated. 


IOCS created the HDRI1 label based on the information supplied by you in 
the DLBL or in a _DTF entry, or information generated by the system. See 
"Section Label Fields” (Figure 32 on page 136 and Figure 33 on 

page 136) for the details about each field of the label. 


If you omit some specifications IOCS defaults to predetermined values. 
See "Section Label Fields” (Figure 33 on page 137). 


After writing the label, IOCS makes the area of the diskettes available 
for writing the data records. 


At CLOSE time IOCS reads and rewrites the HDR1 label in order to update 
certain fields. They ares: 


End-of-Data (D23) This field will be set _ up as the address of the 
record following the last record in the file. 


End-of-Extent (D10) This field will be updated to be the address of 
the last record in the data set. 


Multivolume Indicator (D16) This field will be set up to indicate 
if this 1s a multivolume file; a blank indicates a single volume 
file; a C indicates all but the last volume of a multivolume file; 
and an L indicates the last volume of a multivolume file. 


LABEL PROCESSING FOR ISAM FILES 


This section summarizes DASD label processing performed for indexed 
sequential files. Processing performed for format-1l and format-2 labels 
is described under Load(Create, Extend) Function, Add Function and 
Retrieve Function. The ADD and RETRVE Cretrieve) functions can be 
combined into one operation by specifying the DTFIS entry IQOROUT=ADDRTR. 
ISAM is not supported for FBA devices, the 3330-11, or the 3350 except 
when operated in 3330-1 compatibility mode. 
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ISAM FILES, LOAD C(CCREATE, EXTENT) 


FUNCTION 


VOL1 Label 


The standard volume label (VOL1) must be on cylinder OQ, track O, record 
3 Cexcept for 3350 operated in 3330-1 compatibility mode). If it is 
not, the job is canceled. 


The VOL1 label contains a permanent Volume Serial Number. 
IO0CS neither rewrites nor alters the VOLI1 label in any way. 


Whenever a logical file is to be processed, IOCS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
or XTENT statement. For a single volume Crequiring a minimum of two 
extents), or for a multivolume file, IOCS performs this check for each 
EXTENT. If an error is detected, a message is issued to the operator. 
The operator may mount the correct volume and continue processing,» or 
terminate the job. 


If you use EXTENT and omit the Volume Serial Number, IOCS checks against 

the number of the previous EXTENT. If there was no previous EXTENT, 

te ces he that the correct volume is mounted and does not check the 
abel. 


For a multivolume file, all extents (Cand therefore all volumes) are 
opened before any data records are written. Thus,» all volumes that will 
contain the file must be on-line and ready at the same time. Each 
different symbolic unit must be assigned to a separate physical device. 


IOCS determines the location of the VTOC from the Data File Directory 
field of the VOL1 label. 


If any additional volume labels (VOL2-VOL8) follow the VOL1 label, IO0CS 
ignores them. 


Format-1 Label 


» and one EXTENT 
will occupy on 


You must supply one DLBL statement for the logica 
statement for each separate area (extent) that th 
the volume. 


(0 = 


EXTENT statements define the areas Cextents) of the volume where the 
data records (prime data area), cylinder and master indexes, and 
independent overflow records are to be written. 

An EXTENT statement provides the starting address (called relative 
track) and the number of tracks which indirectly give the ending 
address. An EXTENT statement so contains a code for the type of records 
to be written,» and indicates the sequence in which this statement should 
be inserted into the input stream. The EXTENT statements you supply for 
a LOAD function must also be supplied for any subsequent ADD or RETRVE 
(retrieve) functions. (See Add Function and Retrieve Function, in this 
chapter, for details on additional requirements for these functions.) 


The prime data area (data records) and the cylinder index area are 
required, and you must supply an EXTENT statement for each. If you want 
a master index and/or an independent overflow area, you must also supply 
an EXTENT statement for each desired area. 


The prime data area for a logical file must be one continuous area on 
any one volume. It cannot be scattered over separate areas of a single 
volume. The prime data area can, however, extend to one or more 

vou umeee in which case a separate EXTENT statement is required for each 
volume. 


The prime data area on any pack must start on track O of any cylinder, 
with the exception of track O of cylinder 0, which is reserved for 
labels and system use. Therefore, the prime data area must start on 
some cylinder other than cylinder O and is never written on cylinder O, 
track O of any pack. 


For a multivolume file, the prime data area of the first pack may start 
on any cylinder (Cexcept 0) and must extend through the last track on the 
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pack. On all packs after the first, the prime data area must start on 
cylinder 1, track 0 so that IOCS considers the prime data area as one 
continuous area. On all succeeding packs Cexcept the last) the prime 
data area must extend through the last track on the pack. On the last 
pack, it may end at the end of any cylinder. Thus, in a multipack file, 
all packs, except the first and the last, are completely allotted to the 
prime data area from cylinder 1, track O through the last track on the 
last cylinder. 


For a multivolume file, the VTOC for the first volume must precede the 
prime data area. On the last volume, the VTOC may be on cylinder 0 or 
it may follow the prime data area. On all other volumes, the VTOC must 
be on cylinder 0O. 


Because the prime data area must be considered as one continuous area in 
a multivolume file, the master/cylinder index and independent overflow 
area must be located before the prime data area on the first volume or 
after the prime data area on the last volume. 


During the load operation ISAM builds a Separate track index for each 
cylinder used by the file. Track indexes are considered a part of the 
prime data area and, as such, do not require separate EXTENT statements. 
Each track index starts on the first track (0) of the cylinder that it 
is indexing. 

It can occupy a full track, more than one track, or part of a track and 
share that partially used track with prime data records (shared track). 


Also within the prime data area certain tracks may be reserved, if 
desired, for overflow records that will occur when records are added to 
the file in later operations. These tracks, called a cylinder overflo 
area, must be reserved during the load operation by specifying the DTFIS 
entry CYLOFL. Because this is part of the prime data area, no separate 
EXTENT statements are required. 


The master index and the cylinder index are separate indexes and require 
two separate EXTENT statements. However, when they are written on the 
volume, IOCS combines them into one index area and writes the address of 
that combined area in the format-l label. .Therefore, for these indexes, 
yeu nee release Cin the EXTENT statements) two areas that are adjacent 
o each other. 


SAM builds the master Cif used) and cylinder indexes during the load 
operation. These indexes must be separate from the prime data area and 
wholly contained on one volume. They can be on the same volume with the 
prime data or on a separate volume. They even can be on a different 
type of device from the prime data area. 


You must specify the location of the cylinder index by an EXTENT 
statement. It must immediately follow the master index on a volume, and 
it may be located on one or more successive cylinders. You must also 
specify an Extent Type of 4% and an Extent Sequence Number of 1 in the 
EXTENT statement. If you use EXTENT and omit the Extent Type, IQCS 
assumes the code for a data area. This index contains one entry for 
each cylinder occupied by the data file. 


If you plan to use a master index for a file, you must specify this 
option with the DTFIS entry MSTIND and you must specify its location by 
EXTENT. It must immediately precede the cylinder index on a volume, and 
it may be located on one or more successive cylinders. You must also 
specify an Extent Type of 4 and an Extent Sequence Number of O in the 
EXTENT statement. If you use EXTENT and omit the Extent Type, IOCS 
writes in the code for a data area. This index contains an entry for 
each track of the cylinder index. 


ISAM OPEN first validates the EXTENT statement specifications: 
Ls All prime data extents must be continuous. 


2. The master and cylinder index extents must be continuous and on the 
Same unit. 


3. No extents must overlap. 
The valid extent types are: 
1 ime Data 


= Pe 
2 - Independent Overflow 
G4 - Master Index 
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4 - Cylinder Index 


5% The Extent Sequence Number must be in a specified order: 


Master Index 
Cylinder Index 
through n Prime Data 
1 Independent Overflow 


OR 


0 Master Index 

1 Cylinder Index 

2 Independent Overflow 
3 through n Prime Data 


If a master index is not used, Extent Sequence Number begins with 1. 


Pope routines locate the VTOC by reading its address in the VOLI 
abel. 


IOCS checks the limits of an EXTENT statement against the limits of each 
Extent field of each label already written in the VTOC. If the new 
extents overlap any previously written extents, IOCS checks the 
expiration date of the old (being overlapped) file to ensure that the 
data records are no longer active. 


If the expiration date has passed, I0CS deletes the old label(s), which 
in effect removes the expired file from the volume. 


If the expiration date has not passed, a message is issued to the 
operator. The operator can terminate the job or delete the unexpired 
file and continue processing. 


IOCS reads the format-4 label (first record in VTOC) to determine where 
to write the format-1 and format-2 labels and then writes the labels. 

In a multivolume file, IOCS writes the format-2 label only in the volume 
that contains the cylinder index. 


For a multivolume file, all extents Cand therefore all volumes) are 
opened before any data records are written. Thus, all volumes that will 
contain the file must be on-line and ready at the same time. For each 
volume, IOQCS checks the extents specified in the extent statements for 
that volume Cfor example, checks that the data extents are continuous). 
IOCS also checks the standard VOL1 label and then goes to the VTOC to 
check the file label(€s). Then, the next volume is opened. After all 
the volumes have been opened, the file is ready for processing. 


If you use EXTENT and omit the Symbolic Unit field, IOCS uses the 
Symbolic Unit of the preceding EXTENT. The first EXTENT must contain the 
Symbolic Unit. If you use EXTENT for a multivolume file, you must 
supply, for each volume, at least one EXTENT statement containing the 
Symbolic Unit. All extents on one physical unit must have the same 
Symbolic unit number. 


For label fields K1 and D1-D21 of t 

information supplied by you in DLBL or 

the system. See "Section: Label Fi ds (Figure 20 on page 105 and 

Figure 21 on page 107) for the details eut each field of the label. 
T 


Specify in the DLBL statement a File ype if ISC when using LOAD to 
create a file and a File Type of ISE when using LOAD to extend the file. 
If you use DLBL and omit this fie (Dll of the format-l1 label), I0CS 
writes the code for a SAM file in this field. If an ISC is specified in 
DLBL for a non-load function, the system cancels the job. 


format-1 label, IOCS writes the 
a DTFIS entry, or generated by 


The LOAD function is specified by the DTFIS entry IOROUT. The functions 
of originally loading a file of presorted records and of ing the 
file by adding new presorted records are the same. Both are considered 
a LOAD operation. 

If you use DLBL and omit some specificatio nS» I0cS writes predetermined 
default values. See "Section: Label Fields (Figure 21 on page 107) 
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Label fields D22-D25, D26-D29, and D30-D33 of the format-1 label define 
three areas (Cextents) of the volume, IOCS writes these fields from the 
EXTENT statements you supply. 


The Extent Type 1 (prime data), 2 (Cindependent overflow area), and & 
(master or cylinder index) in the EXTENT is converted to a hex O1, O2;, 
and 04 respectively by IOCS in fields D22, D26, and D30 of the format-l 


label. 
If you use EXTENT and omit the type, IGCS writes hex O1> the 
designation for a prime data area. 


Extent data is written in the format-1 label in the same order that 
EXTENT statements are supplied. This order is specified by the Extent 
Sequence Number, fields D23, D27, and D3l1. First Extent (D22-D25) is 
for master index Cif specified) and cylinder index. Additional Extent 
(D26-D29) is for the prime data area, and Additional Extent (D30-D33) is 
for the independent overflow area Cif specified). Prime data area and 
independent overflow area may be reversed. 


During the load operation, ISAM uses the Extent Sequence Number and the 
Symbolic Unit (SYSnnn>, specified in EXTENT) to determine on what volume 
the extent area is located. The EXTENT statements must be entered in 
ascending order by Extent Sequence Number, with none missing. 


During a LGAD Extend function, IQCS checks the Extent Upper Limit 
(fields D25 and D293 in the format-1 label) against the upper limit 
specified by EXTENT. If the specified limit of either the cylinder 
index or the prime data area is beyond the upper limit in the label, 
IOCS changes the label and makes the new area available for records. If 
the prime data area is extended onto a new volume, IOCS writes the lower 
and upper limits of the next extent specified by EXTENT. Under any 
other condition, the job iS canceled if the limits do not agree. 


After writing the label(€s), IOCS makes the areas of the volume available 
for writing the data records, index(es), and independent overflow 
records. In a multivolume file, IOCS makes all the volumes available at 
the same time. 


IOCS always writes a format-2 label and writes the address of that label 
in the Pointer Field (D34%) of the format-1 label. 
Format~-2 Label 


A format-2 label iS required and maintained by ISAM. This 
to carry updated information from one use (function) of the 
next and to retain many fields of the DTFIS table. 


No separate EXTENT statements are required for the format-2 label. ISAM 
OPEN/CLOSE routines write the label by using the information that you 
supply in DTF specifications or that is calculated during the processing 
of data records. Generally, job control statement information is not 
used. The OPEN routine, however, uses EXTENT specifications in four 
fields during LOAD Create function. 


label is used 
file to the 


Some of the fields in the format-2 label are written when the file is 
opened, whereas other fields are written when the file is closed. 


TOCS always writes a format-2 label in the VTOC after it has written the 
format-1 label. It writes the address of the format-2 label in the 
Pointer Field (D34%) of the format-1 label. 


The RECSIZE written in the format-2 label is used for any following ADD 
or RETRVE functions. 


If a file occupies two or more volumes, IOCS writes the format-2 label 
only on the volume containing the cylinder index. This volume may or 
may not contain data records. The format-2 label is not repeated on the 
additional volumes (Cas the format-l label is). 


If a load file is not closed, such as during an abnormal end of job, the 
format-2 label associated with that file is not completely updated with 
the information that is in the DTF. Caution: Further processing of this 


file may give unpredictable results. 


The statistics provided in several fields of the format-2 label can be 
used to determine whether you should reorganize the file: 
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Di2 - Tag Deletion Count: The number of records you identify (tag) 
for deletion (Cnot processed by [IQCS). 


D13 - Non-First Overflow Reference Count: The number of times a 
READ instruction causes a search of the overflow area(s) for a 
record that is the second or higher in an overflow chain. 


D16 - Prime Record Count: The number of logical records written in 
the organized file in the prime data area(s). IOCS accumulates this 
count during a LOAD operation. 


D2? - Number of Independent Overflow Tracks: The number of tracks 
still available in the independent overflow area. 


D28 - Overflow Record Count: The number of records written in all 
the overflow areas for the file (Ccylinder overflow areas and/or 
independent overflow area). 


D29 - Cylinder Overflow Area Count: The number of cylinder overflon 
areas that have been filled. 


See "Section: Label Fields™ CFigure 24 on page 120) for the details 
about each field of the format-2 label. 


ISAM FILES, ADD FUNCTION 


VOL1 Label 


The standard volume label (VOLI1) must be on cylinder O;, track O, record 
oe If it is not, the job is canceled. 


The VOL1 label contains a permanent Volume Serial Number. 
IocS neither rewrites nor alters the VOLI1 label in any way. 


Whenever a logical file is to be processed, IOCS reads and checks the 
VOL1 label against the Volume Serial Number that you supply in an EXTENT 
statement. 

For a single volume Crequiring a minimum of two extents), or for a 
multivolume file, IOCS performs this check for each EXTENT. If an error 
is detected, a message is issued to the operator. The operator may 
mount the correct volume and continue processing, or terminate the job. 


If you use EXTENT and omit the Volume Serial Number, IOCS checks against 

the number of the previous EXTENT. If there was no previous EXTENT, 

NA joeute? that the correct volume is mounted and does not check the 
abel. 


For a multivolume file, all extents Cand therefore all volumes) are 
opened before any data records are written. Thus, all volumes that will 
contain the file must be on-line and ready at the same time. 


IOCS determines the location of the VTOC from the Data File Directory 
field of the VOLI label. 


If any additional volume labels (VOL2-VOL8) follow the VOL] label, [OCS 
ignores them. 


Format-l Label 
You must supply one DLBL statement for the logic 


a 
statement for each separate area Cextent) that th 
volume. 


1 file, and one EXTENT 
e file occupies on the 


EXTENT statements define the areas Cextents?)? of the volume where the 
data records (prime data area), cylinder and master indexes, and 
independent overflow records are written. An EXTENT statement provides 
the starting address (called relative track) and the number of tracks 
which indirectly give the ending address. An EXTENT statement also 
contains a code for the type of records to be written, and indicates the 
ec ouence in which this statement should be inserted into the input 
stream. 


For an ADD function, you must supply the same EXTENT statements that you 
supplied for the LOAD function. You must supply an EXTENT for the prime 
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data area (data records) and the cylinder index. If you specified a_. 
master index, you must supply an EXTENT for this area. If you specified 
an independent overflow area during the load operation, you must supply 
an EXTENT for this area. If an independent overflow area has not been 
established, you can specify one during the add function by supplying an 
EXTENT statement for this area. 


The prime data area for a logical file is one continuous area on any one 
volume. It is not scattered over separate areas of a single volume. 

If, however, the prime data area extends to one or more other volumes, 
you must supply a separate EXTENT statement for each volume. 


The prime data area on any volume starts on track O of any cylinder with 
the exception of track 0 of cylinder 0, which is reserved for labels and 
system use. Therefore, the prime data area starts on some cylinder 

e ener than cylinder 0O and is never written on cylinder OQ, track O of any 
volume. 


For a multivolume file, the prime data area of the first volume starts 
on any cylinder Cexcept 0) and extends through the last track on the 
volume. On all volumes after the first, the prime data starts on 
cylinder 1, track O so that IGOCS considers the prime data area as one 
continuous area. Qn all succeeding volumes (Cexcept the last}, the prime 
data area extends through the last track on the volume. On the last 
volume, it ends at the end of any cylinder. Thus,» in a multivolume file 
all volumes, except the first and last, are completely allotted to the 
prime data area from cylinder 1, track O through the last track in the 
last cylinder. 


For a multivolume file the VTOC for the first volume precedes the prime 
data area. On the last volume, the VTOC is on cylinder O or it follows 
the prime data area. On all other volumes, the VTOC is on cylinder OQ. 


Because the prime data area is considered as one continuous area ina 
multivolume file, the master/cylinder index and independent overflow 
areas are located before the prime data on the first volume or after the 
prime data area on the last volume. 


During the load operation, ISAM has built a separate track index for 
each cylinder used by the file. Track indexes are considered a part of 
the prime data area and, as such, do not require separate EXTENT 
statements. Each track index is located on the first track (0) of the 
cylinder that it is indexing. It can occupy a full track, more than one 
track, or part of a track and share that track with prime data records 
(shared track). 


Also,» within the prime data area, certain tracks may have been reserved 
for overflow records that occur when records are added to the file 
These tracks, called a cylinder overflow area, are reserved during the 
load operation and used during an add operation. If you use cylinder 
overflow areas, you must specify the DTFIS entry CYLOFL during both the 
load and add functions. Because the cylinder overflow areas are a part 
of the prime data area,» no separate EXTENT statements are required. 


The master index and the cylinder index are separate indexes and require 
two separate EXTENT statements. However, when they were written on the 

volume, IOCS combined them into one index area and wrote the address of 

that combined area in the format-1 label. Therefore, for these indexes, 

you must specify Cin the EXTENT statements) two adjacent areas. 


ISAM has built the master Cif used) and cylinder indexes during the load 
operation. These indexes are separate from the prime data area and 
wholly contained on one volume. They can be on the same volume with the 
prime data or on a separate volume. They can also be ona different 
type of device than the prime data area. 


You must specify the location of the cylinder index by EXTENT. It 
immediately follows the master index on a volume, and it may be located 
on one or more succesSive cylinders. You must also specify an Extent 
Type of @ and an Extent Sequence Number of 1 in the EXTENT statement. If 
you use EXTENT and omit the Extent Type, 1 is assumed. 


If you specified a master index during the load operation, you must 
again specify this option for the add function with the DTFIS entry 
MSTIND. You must specify its location by EXTENT. The master index 
immediately precedes the cylinder index on a volume, and it may be 
located on one or more successive cylinders. You must also specify an 
Extent Type of 4&4 and an Extent Sequence Number of 0 in the EXTENT 
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statement. If you use EXTENT and omit the Extent Type, this field is 
not checked. 


An independent overflow area may be specified for storing overflow 
records that occur when records are added to the file. If you plan to 
use an independent overflow area» you must supply an EXTENT to specify 
its location on the volume. The independent overflow area may be on the 
same volume with the prime data area,» or ona separate volume, but i 
must be wholly contained on one volume. It must be on the same type of 
device as that containing the prime data area. You can specify this 
area sues 2 load or add operation, but it is used during the add 
operation. 


dent overflow area and cylinder overflow 
» ISAM places overflow records first in the 
n the prime data area. When any cylinder 

» ISAM writes the additional overflow 

n the independent overflow area. 


If you specify both an inde 

area (by DTFIS entry CYLOFL 

cylinder overflow area eee 
e 
r 


Os 


overflow area becomes fil 
records from that cylinde 


ISAM OPEN first validates the EXTENT statement specifications: 


Ls The master and cylinder index extents must be continuous and on the 
Same unit. 


2% No extents must overlap. 


Ss The valid extent types are: 


1 - Prime Data 

2 - Independent Overflow 
4 ~- Master Index 

4 - Cylinder Index 


4G. The Extent Sequence Number must be in a specified order: 


0 Master Index 
1 Cylinder Index 
2 through n Prime Data 

n+1 Independent Overflow 


OR 


0 Master Index 

1 Cylinder Index 

2 Independent Overflow 
3 through n Prime Data 


IOCS checks the limits of an EXTENT against the limits of each Extent 
field of each label already written in the VTOC. If the new extents 
overlap any previously written extents, IOCS checks the expiration data 
of the old Cbeing overlapped) file to ensure that the data records are 


no longer active. 
If the expiration data has passed, IOCS deletes the old label(s), which J 
in effect, removes the expired file from the volume. 


If an expiration date has not passed» a message is given to the 
operator. The operator can terminate the job or delete the unexpired 
file and continue processing. 


If you use EXTENT and omit the Symbolic Unit field, IOCS uses the 

Symbolic Unit of the preceding EXTENT. The first EXTENT must contain 
the Symbolic Unit. If you use EXTENT for a multivolume file, you must 
supply, for each volume, at least one EXTENT statement containing the 


Symbolic Unit. 


For a multivolume file» all extents Cand therefore all volumes) are 
opened before any data records are added. Thus, all volumes that 
contain the file must be on-line and ready at the Same time. 


I0CS locates the format-1 label of the file to be processed by first 
reading the address of the VTOC in the VOLI label and then searching the 
VTOC for the format-1 label that contains the File Identification you 
specify in DLBL. If an independent overflow area is specified during 
the add function on an existing volume, IOCS updates the format-1 label. 
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If the independent overflow area is specified on a new volume, IOCS 
writes a format-l1 label for that volume. 


The File Identification (field K1) was written in the Key area of the 
label record when the file was created. Thus» you must specify the same 
scene eer ee now as you did when the file was written during the load 
operation. 


If you use DLBL and omit the File Identification, IOCS searches for 
label in the VTOC by using the DTF name that you specify in the DLBL 
Filename field. 


For label fields, D1-D21, IOCS OPEN routines check the appropriate 
fields against the corresponding information supplied by you in DLBL or 
in a DTF specification. Some fields provide information that is required 
during the processing of data, and other fields are ignored. See 
"Section: Label Fields" (Figure 20 on page 105 and Figure 21 on 


the 


page 107) for the details about each field of the label. 
You must specify in the DLBL statement a File Type of ISE for the ADD 
function. If you use DLBL and omit this field (D111 of the format-l 

M file in this field. 


The ADD function is used to insert ne ones into an organized file 


hi 
label), IOCS assumes the code for an SA 
wor 
and is specified by the DTFIS entry IQRO 
If you use DLBL and omit some specificati 
default values (see Figure 21 on page 10 


Label fields D22-D25, D26-D29, and D30-D33 of the format~-1 label define 
three areas Cextents) of the volume, IOCS wrote these fields during the 
load operation from the EXTENT statements you supplied. 


ons, IOCS assumes predetermined 


The Extent Type 1 (prime data), 2 (independent overflow area), and & 
(master or cylinder index) in the EXTENT is converted to a hex O11, Q2d; 
and 046, respectively by I0OCS in fields D22, D26, and D30 of the format-l 
label. If you use EXTENT and omit the type, this field is not checked. 


The extent information was written in the format-1i label in the same 
order that the EXTENT statements were supplied during the load 
operation. The EXTENT statements must be supplied in this same order 
for the retrieve function. This order is specified by the Extent 
Sequence Number, fields D23, D27>, and D31. The First Extent (D22-D25) 
is for the master index Cif specified) and cylinder index. Additional 
Extent (€D26-D29) is for the prime data area,» and Additional Extent 
(D30-D33) is for the independent overflow area if specified. The prime 
data area and independent overflow area may be reversed. 


During an ADD operation, ISAM uses the Extent Sequence Number in 
conjunction with the Symbolic Unit (SYSnnn,>, specified in EXTENT) to 
determine on what volume the extent area is located. The EXTENT 
statements must be entered in ascending order by Extent Sequence Number, 
With none missing. 


During an ADD function, IOCS checks the Extent Upper Limit (fields D25 
and D293 in the format-1 label) against the upper limit specified by 
EXTENT. If the specified limit of the independent overflow area is 
beyond the upper limit in the label, IOQCS changes the label and makes 
the new area available for records. If an independent overflow area is 
established at this time, IOCS writes the lower and upper limit of the 
new extent specified by EXTENT. Under any other condition, the job is 
canceled if the limits do not agree. 


After checking the label(€s), YOCS makes the areas of the volume 
available for processing. In a multivolume file, IOCS makes all volumes 
available at the same time. 


I0cS locates the format-2 label by reading the address of that label in 
the Pointer Field (D34) of the format-1 label. 

Format-2 Label 

A format-2 label is required and maintained by ISAM. om 


1s 
to carry updated information from one use (function) of the 
next and to retain many fields of the DTFIS table. 
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No separate EXTENT statements are required for the format-2 label. ISAM 
OPEN/CLOSE routines wrote the label during the load operation by using 
the information that you supplied in the DTF specification or that was 
calculated during the processing of data records. 


Some of the fields in the format-2 label are written when the file is 
opened, whereas other fields are written when the file is closed. 


IOCS always writes a format-2 label in the VTOC after it has written the 
format-1 label. It writes the address of the format-2 label in the 
Pointer Field (D34%) of the format-1 label. 


If a file occupies two or more volumes, IOCS writes the format-2 label 
only on the volume containing the cylinder index. This volume may or 
may not contain data records. The format-2 label is not repeated on the 
additional volumes Cas the format-1 label is). 


The RECSIZE written in the format-2 label by the LOAD is used by the 
LOAD during the ADD operation, not the RECSIZE in the ADD DTFIS. 


Several fields of the format-2 label can be used to determine the status 
of overflow areas: 


D9 - Highest "R™ on Overflow Tracks: The number of the last record 
on each track of the cylinder and/or independent overflow area. 


D25 - Last Independent Overflow Record Address: The address of the 
last record written in the independent overflow area. 


D27 - Number of Independent Overflow Tracks: The number of tracks 
still available in the independent overflow area. 


D28 - Overflow Record Count: A count of the records written in the 
cylinder overflow areasS and/or independent overflow. 


D29 - Cylinder Overflow Area Count: A count of the cylinder 
overflow areas that have been filled. The statistics provided in 
several fields of the format-2 label can be used to determine 
whether you should reorganize the file: 


D12 - Tag Deletion Count: The number of records you identify (tag) 
for deletion (not processed by IQOCS). 


D13 - Non-First Overflow Reference Count: The number of times a 
READ instruction causes a search of the overflow area(s) for a 
record that is the second or higher in an overflow chain. 

D16 - Prime Record Count: The number of logical records written in 
the organized file in the prime data area(s). IOCS accumulates this 
count during a LOAD operation. 


D27 - Number of Independent Overflow Tracks: The number of tracks 
still available in the independent overflow area. 


D28 - Overflow Record Count: The number of records written in all 
the overflow areas for the file (cylinder overflow areas and/or 
independent overflow area). 


D29 - Cylinder Overflow Area Count: The number of cylinder overflow 
areas that have been filled. 


See "Section: Label Fields" (Figure 24 on page 120) for the details 
about each field of the format-2 label. 
ISAM FILES, RETRIEVE FUNCTION 


VOL1 Label 


The standard volume label (VOL1) must be on cylinder O, track O», record 
3. If it is not, the job iS canceled. 


The VOLI1 label contains a permanent Volume Serial Number. 
Whenever a logical file is to be processed, IOCS reads and checks the 


VOL1 label against the Volume Serial Number you supply _in an EXTENT 
statement. For a single volume (requiring a minimum of two extents), or 
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for a multivolume file, IOQCS performs this check for each EXTENT. If an 
error is detected, a message is issued to the operator. The operator 
bd mount the correct volume and continue processing» or terminate the 
job. 


If you use EXTENT and omit the Volume Serial Number, IQCS checks against 
the number of the previous EXTENT. If there was no previous EXTENT, 
core pecumes that the correct volume is mounted and does not check the 

a e e 


For a multivolume file, all extents (Cand therefore all volumes) are 
opened before any data records are read or updated. Thus, all voiumes 
containing the file must be on-line and ready at the same time. 


IOCS determines the location of the VTOC from the Data File Directory 
field of the VOL1 label. 


If any additional volume labels (VOL2-VOL8) follow the VOL1 label, IOQCS 
ignores them. 


Format-1 Label 


You must supply one DLBL statement for the logical file,» and one EXTENT 
asi aes for each separate area Cextent) that the file occupies on the 
volume(s). 


EXTENT statements define the areas Cextents) of the volume where the 
data records (prime data area), cylinder and master indexes, and 
independent overflow records are written. An EXTENT statement provides 
the starting address (called relative track) and the number of tracks 
which indirectly give the ending address. An EXTENT statement also 
contains a code for the type of records to be written, and indicates the 
iri in which this statement should be inserted into the input 
stream. 


For a retrieve CRETRVE) function you must supply the same EXTENT 
statements that you supplied for the LOAD or ADD function. You must 
supply an EXTENT for the prime data area (data records) and the cylinder 
index. If you specified a master index during the load operation», you 
must supply an EXTENT for this area. If you specified an independent 
overflow area during the load or add operation, you must supply an 
EXTENT for this area. 


The prime data area for a logical file is one continuous area on any one 
volume. It is not scattered over separate areas on a single volume. If 
the prime data area, however, extends to one or more other volumes» you 
supply a separate EXTENT statement for each volume. 


The prime data area on any volume starts on track O of any cylinder, 
with the exception of track O of cylinder O, which is reserved for 
labels and system uSe. Therefore, the prime data area starts on some 
cylinder other than cylinder O and is never written on cylinder OQ, track 
0 of any volume. 


For a multivolume file, the prime data area of the first volume starts 
on any cylinder (Cexcept 0) and extends through the last track on the 
volume. On all volumes after the first, the prime data starts on 
cylinder 1, track O so that IOCS considers the prime data area as one 
continuous area. On all succeeding volumes Cexcept the last) the prime 
data area extends through the last track on the volume, On the last 
volume, it ends at the end of any cylinder. Thus, in a multivolume file 
all volumes, except the first and last, are completely allotted to the 
prime data area from cylinder 1, track 0 through the last track in the 
last cylinder. 


For a multivolume file, the VTOC for the first volume precedes the prime 
data area. On the last volume, the VTOC is on cylinder O or it follows 
the prime data area. On all other volumes,» the VTOC is on cylinder 0O. 


Because the prime data area is considered as one continuous area in a 
multivolume file, the master/cylinder index and independent overflow 
areas are located before the prime data on the first volume or after the 
prime data area on the last volume. 


During the load operation, ISAM has built a separate track index for 


each cylinder used by the file. Track indexes are considered a part of 
the prime data area and, as such, do not require separate EXTENT 
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statements. Each track index starts on the first track (0) of the 
cylinder that it iS indexing. It can occupy a full track, more than one 
track, or part of a track and share that track with prime data records 
(shared track). 


Also, within the prime data area, certain tracks may have been reserved 
for overflow records that occur when records are added to the file. 
These tracks, called a cylinder overflow area, are reserved during the 
load operation by specifying the DTFIS entry CYLOFL, and are used during 
an add operation. 

Because this is part of the prime data area,» no separate EXTENT 
statements were required during the load operation. For the retrieve 
function, the DTFIS entry is not required. 


The master index and the cylinder index are separate indexes and require 
two separate EXTENT statements. However, when they were written on the 
volume, IQCS combined them into one index area and wrote the address of 
that combined area in the format-l1 label. Therefore, for these indexes, 
you must specify Cin the EXTENT statements) two adjacent areas. 


ISAM has built the master Cif used) and cylinder indexes during the load 
operation. These indexes are separate from the prime data area and 
wholly contained on one volume. They can be on the same volume with the 
prime data or on a separate volume. They can also be on a different 
type of device than the prime data area. 


You must specify the location of the cylinder index by EXTENT. It 
immediately follows the master index on a volume, and it may be located 
on one or more successive cylinders. You must also specify an Extent 
Type of © and an Extent Sequence Number of 1 in the EXTENT statement. 
If you use EXTENT and omit the Extent Type, this field is not checked. 


If you specified a master index during the load operation, you must 
again specify this option for the retrieve function with the DTFIS entry 
MSTIND. You must specify its location by EXTENT. The master index 
immediately precedes the cylinder index on a volume, and it may be 
located on one or more successive cylinders. You must also specify an 
Extent Type of @ and an Extent Sequence Number of O in the EXTENT 

Ns ahr AS If you use EXTENT and omit the Extent Type, this field is not 
checked. 


An independent overflow area may have been specified for storing 
overflow records that occurred when records were added to the file. If 
you specified an independent overflow area during the load or add 
function, you must again supply an EXTENT statement to specify its 
location during the retrieve function. The independent overflow area 
may be on the same volume with the prime data area» or on a separate 
volume, but it must be wholly contained on one volume. It must be on 
the same type of device as that containing the prime data area. 


If you specified both an independent overflow area and cylinder overflow 
areas (by DTFIS entry CYLOFL during the load operation), ISAM placed 
overflow records first in the cylinder overflow area within the prime 
data area. When any cylinder overflow area became filled, ISAM wrote the 
additional overflow records from that cylinder in the independent 
overflow area. 


If you use EXTENT and omit the Symbolic Unit field, IQCS uses the 

Symbolic Unit of the preceding EXTENT. The first EXTENT must contain 
the Symbolic Unit. If you use EXTENT for a multivolume file,» you must 
supply, for each volume, at least one EXTENT statement containing the 


Symbolic Unit. 


For a multivolume file, all extents Cand therefore all volumes) are 
opened before any data records are retrieved. Thus, all volumes that 
contain the file must be on-line and ready at the same time. 


I0CS locates the format-l1 label of the file to be processed by first 
reading the address of the VTOC in the VOL1 label and then searching the 
VTOC for the format-1 label that contains the File Identification that 
you specify in DLBL. The File Identification (field K1) was written in 
the key area of the label record when the file was created. ThusS», you 
po laa ed the same identification now as you did when the file was 
wri en. 


If you use DLBL and omit the File Identification, I0CS searches for the 


label in the VTOC by using the DTF name that you specify in the DLBL 
Filename field. 
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IOCS does not check label fields D1-D21 against the corresponding : 
information supplied by you in DLBL or in a DTF specification as it did 
during the load or add operation. 


You must specify in the DLBL statement a File Type of ISE for the 
retrieve (CRETRVE) function. If you use DLBL and omit this field (D111 of 
format-1 label), IOCS assumes the code for an SAM file in this field. 


Use the DTFIS entry INROUT to specify the retrieve (RETRVE) function, 
which retrieves records from a ile for either random or sequential 
processing and/or updating. You must also specify the DTFIS entry 
TYPEFLE for a retrieve function to designate whether the type of 
processing to be performed is random, sequential, or both. 


If you use DLBL and omit some specification, IOCS assumes predetermined 
default values (see Figure 21 on page 107). 


Label fields D22-D25, D26-D23, and D30-D33 of the format-1 label define 
three areas (extents) of the volume. IOCS wrote these fields from the 
EXTENT statements you supplied during the load operation. 


The Extent Type 1 (prime data), 2 Cindependent overflow area), an 
(master or cylinder index) in the EXTENT is converted to a hex Ol 
and 04%, respectively, by IOCS in fields D22, D26>, and D30 of the 
Fouts label. If you use EXTENT and omit the type, this field is not 
checke 


The extent information was written in the format-l label in the same 
order that the EXTENT statements were supplied during the load 
operation. The EXTENT statements must be supplied in this same order for 
the retrieve Sper scion. This order is specified by the Extent Sequence 
Number, fields D23, D27, and D311. The First Extent (D22-D25) is for the 
master index (Cif 5s cified) and cylinder index. Additional Extent 


m 


p 
(D26-D29) is for th prime data ares, and Additional Extent (€D30-D33) is 
for the independent overflow area (Cif specified). The prime data area 
and independent overflow area may be reversed. 


During a retrieve operation, ISAM uses the Extent Sequence Number in 
conjunction with the Symbolic Unit (SYSnnn, specified in EXTENT) to 
determine on what volume the extent area is located. The EXTENT 
statements must be entered in ascending order by Extent Sequence Number, 
with none missing. 


IOCS makes available (for processing) the areas you specify in EXTENT 
(the data records, index(€es), and independent overflow records) without 
checking against the limits in the label CExtent Sequence Number and 
Symbolic Unit are checked). In a multivolume file, IOCS makes all the 
volumes available at the same time. 


IO0cS locates the format-2 label by reading the address of that label in 
the Pointer Field (D346) of the format-l label. 


Format-2 Label 
A format-2 label is required and maintained by ISAM. This lab 


e 
to carry updated information from one use (Cfunction) of the fil 
next and to retain many fields of the DITIFIS table. 


ed 


l is us 
e to the 


No separate EXTENT statements are required for the format-2 label. ISAM 
OPEN/CLOSE routines wrote the label during the load operation by using 
the information you supplied in DTF specifications or that were 
calculated during the processing of data records. 


Some of the fields in the format-2 label are written when the file is 
opened, whereas other fields are written when the file is closed. 


IOCS always writes a format-2 label in the VTOC after it has written the 
format-1i label. It writes the address of the format-2 label in the 
Pointer Field (D34) of the format-1 label. 


If a file occupies twa or more volumes, IOCS writes the format—-2 label 
only an the volume containing the cylinder index. This velume may or 
may not contain data records. The format-2 label is not repeated on the 
additional volumes Cas the format-1 label is). 


The RECSIZE written in the format-2 label by the LOAD is used during the 
retrieve operation, not the RECSIZE in the RETRVE DTFIS. 
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The statistics provided in several fields of the format-2 label can be 
used to determine whether you should reorganize the file: 


Di2 - Tag Deletion Count: The number of records you identify tag 
for deletion (not processed by IO0CS). 


D13 - Non-First Overflow Reference Count: The number of times a 
READ instruction causes a search of the overflow area(s) for a 
record that is the second or higher in an overflow chain. 

D16 —- Prime Record Count: The number of logical records written in 
the organized file in the prime data area(s). IOCS accumulates this 
count during a LOAD operation. 


D27 - Number of Independent Overflow Tracks: The number of tracks 
still available in the independent overflow area. 


D28 - Overflow Record Count: The number of records written in all 
the overflow areas for the file cylinder overflow areas and/or 
independent overflow area. 


D29 - Cylinder Overflow Area Count: The number of cylinder overflow 
areas that have been filled. 


See "Section: Label Fields™ (Figure 24 on page 120) for the details 
about each field of the format-2 label. 


yous section describes all the DASD and diskette labels supported by 
S . 


Volume Label 1 (VOL1)) - DASD and Diskette 

Format-1 label 

Format-2 label 

Format-3 label 

Format-4 label 

HDR1 label - Diskette 

User-Standard Header Label CUHLI-UHL8) 

User-Standard Trailer Label CUTLI1-UTL8). 
Each label is illustrated, and each field of each label is described in 
detail. The individual fields in the illustrations are numbered to 
relate to the corresponding descriptions. The label fields located in 
the key area of a DASD record are numbered Ki-Kn. The fields of a 
eRe eee record, or in the data area of the DASD record are numbered 

1-Dn. 

The descriptions of the label fields include the: 


° Displacement in hex notation. 
° Field Number - Kn or ODn 
e Length of the field in bytes Chex notation). 


° Content of each field,» together with the name of the field. 
An additional table shows for each field: 


e Source of Information for checking or writing this field. 
° Purpose of the field. 
° Processing performed on input/output. 
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° DLBLZEXTENT Default for the format-1 and format-3 labels only. 


Throughout this section, the requirements and specifications relating to 
the 3330 apply also to the 3333 and the 3350 in 3330-1 compatibility 
mode. The requirements and specifications given for the 3340 apply 
also to the 3344. 


LABEL FIELDS FOR DASD 


Volume Label on Disk (VOL1) 


The volume label has a 4-byte key area and an 80-byte data area. Both 
the key area and the first four bytes of the data area always contain 
the characters "VOL1" for the first volume label. Additional volume 


labels are ignored by VSE. 

The displacement is in hex notation, counting from the beginning of the 
label.Cafter the key fields). The fields are identified by the numbers 
Ki1,K2 (key fields) and D1 to D113 (data fields). 


Figure 18 shows the format of volume labels on disk. 


Displ. Field Length Content 


0 3 Identifier: VOL. IOCS checks whether a 
VOLUME Label is present on 
the Volume. 
Volume Label No. VSE supports only VOLI. 


Identifier: VOL. Checked by IOCS 

Volume Label No. only VOLI1 supported 

Volume serial number provides a unique 
identification for the volume. 
It is generally assigned when the volume is 
first received in the installation. 
The source of information is the EXTENT 
statement. 
IOCS checks the Serial No. given in the 
EXTENT statement against this field. 
If no Serial No. Operand is specified in 
the EXTENT Statement IOCS assumes the 
correct volume mounted. 


Security byte used by OLTEP 

VTOC address. Contains the address of the 
Format—-4 label. 
This address is written at initialisation 
time. 

Blank 

CI-size for FBA>, blanks for CKD 

Number of blocks per CI for FBA, blanks for CKD 

BueDer of labels per CI for FBA, blanks for CKD 

an 
Owner code for LVTOC listing 
Blank 


Figure 18. Disk Volume Label CVOL1 Label) 
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K1,D1 Source’ of Informatian : System 


Purpose: 
Identifies the standard 
both 


lume label. This field is written in the first 
three positions of e 


vo 
the key and data areas of the volume label record. 
Processing: 

On both input and out,IOCS checks this field to verify that a standard 
volume label 18S present on the volume.The volume label should be written 
previously, before a logical file of data records is written on the volume. 


K2,D2 Source of Information : System 


Purpose: 

Indicates the sequence of this label within the volume label (VOL) group. 
DOS/VSE supports Volume Label only, but provision is made for additional 
standard volume labels if required in other systems. This field is written 
in lb fourth position of both the key and data areas of the volume label 
record. 


Processing: 
This field is processed in conjunction with the label identifier to 
completely identify the volume label. 


D3 Source of Information : EXTENT 


Purpose: 

Provides a unique identification for a volume. The number is generally 
assigned when the volume is first received in th stallation. This number is 
also used as the File Serial Number in the format-1 label of each logical 
file written on the volume. This provides a unique identification of the 
volume/file relationship. If a multivolumelogical file 18 written, the 
Volume Serial Number of the first volume becomes the File Serial Number in 
the format-1 label on all volumes. 


Processing: 

On both input and out,IOcCS checks this field against 
the user in the Volume Serial Number field of EXTENT 
no operand is specified, IOCS assumes the correct vo 
not check this field. 


he number supplied by 
- If EXTENT is used and 
lume i 


DG Source of Information 


Purpose: 
Provides a code to indicate that additional identification is required 
before a volume can be considered the correct one for processing. DOS/VSE 
does not use this field, but provision is made for additional sec in other 
system. For example,OS/VS allows an operator response of a predetermined 
‘nassword’" to futher authorize a volume for processing. 


Processing: 
On both input and out,IOCS ignores this field. 


Source of Information 


Purpose: 
Provides the starting address of the Volume Table of Contents (VTOC). This 
Sad ee leans Pe along with the Volume Serial Number when the yolume is 
initialized. 


Processing: 
On both input and out,IOCS refers to this field to find out where standard 
labels are located on this volume. 


D6 Source of Information 


Purpose: 


Reserved for future use. Should contain blanks. 


Figure 19 (Part 1 of 2). Standard Volume Label 1 Fields (DASD) 
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Figure 19 


Purpose: 
Identifies the fixed-length control interval size by which the VTOC for FBA 


devices is subdivided. 


Source of Information : 


Purpose: 
Indicates the number of physical blocks per control interval. 


Source of Information : 


Purpose: 
Indicates the number of fixed-length slots in each control interval which 


may contain labels. 
Source of Information 


Purpose: 
Reserved for futher use. Should contain blanks. 


Source of Information : 


Purpose: 

Identifies the owner or assignee to whom this volume belongs» such as a 
customer, installation, department, or system. This can be of value for 
controlling the allocation of volumes in a large installation. This field 
is printed on SYSLST when the LISTVTOC program is executed. 


Processing: 
On both input and out,IOCS ignores this field. 


Source of Information : 


Purpose: 
Reserved for future use. Should contain blanks. 


(Part 2 of 2). Standard Volume Label 1 Fields (DASD) 
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IBM-Standard File Labels on Disk 


Types: Traditionally, four types of IBM-standard file labels are 
counted: 


° Format-1, the normal disk file label for the first 3 extents 
° Format-3, a file continuation label for the next 13 extents 
e Format-2, used with ISAM only. 


e eee the VTOC file label, written at initialization of the 
evice 


Size: An IBM-standard file label is 140 bytes long and consists of a 
44-byte key area and a 96-byte data area. 


The VTOC: All IBM-standard file labels on a volume are jin the VTQOC>» a 
directory of all files on the volume. The VTOC itself is a file also and 
has its own file label, the VTOC label. The VTOC is located where you 
specify it when you initialize your volume. The address of the VTOC 
label (format-4) is saved in the volume label. 


Several Volumes: For several volumes of one file, the file label is 
repeated in the VTGC of each volume. The file label on each volume 
describes the portion of the file on that volume and its extents. 


Figure 20 on page 105 to Figure 24 on page 120 show IBM-standard label 


formats for disk files, that is, the first IBM-standard file label, the 
continuation label, the ISAM label and the VTOC label. 
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FORMAT-1 LABEL LAYOUT AND CONTENT 


Displ. Field Length Content 


0 K1 2C File-ID: 1-35 bytes if generation number (Gnnn) 
and version number (Vnn) are specified, 
else 1 to 
Source of Information: 
DLBL or I0CS 
VSAM catalog routines, 
AMS DEFINE command. 
Processing: 
-ID may be specified in the 
e-ID field, if this specification 
d, IOCS uses the DTF-name specified 
in the DLBL-filename-field (stored in the 
key area of the label record) to search 
Con input) in the VTOC key areas 
for the file entry. 
Under VSAM a data space name 
CVSAM catalog routine?) or the n 
index or data is the contents ( 
Stmt. or generated by VSAM). 


Format ID: 1. Written Con output) and checked 
by IOQCS to distinguish this label from the 
other types (Format 2-5). 

Volume serial no.: numeric identification for 
the first volume of the file. 

Written by I0CSon output. 

Volume sequence number within the file to 
identify the volume in an multivolume Cuees 
Written Con output) and checked by I0 

Creation date: yyddd. By IOCS from SYSCOM Con 
output), checked against label record (DLBL) 
on input. The actual year may be calculated 
by adding yy to 1900. 

Expiration date indicates when the data record 
is considered inactive. (Same format as 
creation date.) 

Source: DLBL, IOCS, AMS or System (creation 
date + 7 by default). 

Number of extents of the multi extent file on 
this volume. 

Used by OS/VS 

Reserved 

System code: indicates the Programming System 
which has written the file. 
esa is the code written by IOCS if DLBL 
1s used. 

Date of last access: yyddd; not used by VSE 

Reserved 

Number of blocks per CI for FBA;, blanks for CKD 

File type: vee Lt 


SAM (default, field 
DLBL omited) 
ISAM 


Checked agains e of DTFon input. 
Written from D y I0CS on output. 


ame of an 
AMS DEFINE 
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Displ. Field Length Content 


54 D12 Record Format: Used by OS/VS. IOCS writes 0O 
55 D13 for a al Atl used for ISAM file: 
: index 


aE overflow area 


M blocks, from DTF 
re) SAM files. From DTF 
I From DTF 
ation in ISAM block. From DTF 
Last volume (CSAM only) 
File security. From DLBL 
e request was: 
in blocks 
or continuous extent 
or maximum continuous extent 
ot under specified minimum 
Used by OS/VS. I0OCS writes blanks 
Used by OS/VS. IOCS writes zeros 
Start of next record to end-of-data distance 
(negative displacement) 
Type of extent: Categorie of records 
(from EXTENT) 
(prime) data area or data Space extent 
independent overflow area extent 
master/cylinder index area extent 
extent for user-standard labels 
split cylinder extent (SAM) 
D23 1 Sequence number of extent in the file. 
From EXTENT or I0CS 
D24 4 Extent lower limit (cchh for CKD, bbbb for FB 
D25 4 Extent upper limit (cchh for CKD, bbbb for FB 
fields D22 - D25 are now repeated twice as D26 - D33 to 
ribe the next two extents still allowed on this label. 
Format-1 label can reflect 3 extents of a multiextent-file, 
1 


m woo 
=—YUWwWOooOorr AorH tz 


Co ooogo 
| — = = = 
Oo ONAL 
ce co co oo IL of cr JD ce ee oo 
Nee Aho KI 


AUT 
I hh 


On 
> 


A) 
A) 


0 


ional extents are documented in an corresponding Format-—3 


® 


my 404 
oO warn s,an 


“wa 7wadynWm Ny 
o— 


D34 5 Address of next label for the file 
on this volume. Written and used by I0CS 
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Figure 21 


DLBL/EXTENT Default : DTF Filename 


Source of Information: : DLBL/IOCS 
IOCS (VSAM Catalog Routi 
Access Method Services D 
command 


Purposes: 

File-ID permits identify your logical file by an application-oriented 
unique name. A 1 can be composed by linking together key words ina 
form ce One tere 


DOS.SYSSLB.FIL 


Generation number identifies the various editions of a file, such as a 
Grandfather-father-son relationship. Thus, it can be used to ensure that 
the desired edition of the file is selected for processing, if several 
editions are maintained. The editions should be numbered in sequence. 


OS/VS file structure (for example, 


Version number provides a more detailed identification of the editions of a 
file. For example, generation could specify a month (1-12), and version 
could specify a particular week (1-5) of the month. File-ID, generation, 
and/or version occupy the key area of the label record. IOCS uses this to 
identify the label of a file specified for processing. 


Processing: ; 

You can specify the file in the corresponding field of DLBL. 
If you use DLBL and omit 1 1 CS uses the DTF name specified in the 
DLBL Filename field. On 1 arches the VTOC key areas for this 
identification specified 1 1 ification or Filename) in the key 
area of the label record. 


Under VSAM, this field will normally contain a data space name generated by 
VSAM catalog routines. However, if this data space contains the data or the 
index of a Unique file, this field contains the name of the data or index 
epee eae the DEFINE statement or generated by VSAM Cif a name was not 
specifie . 


DLBL/EXTENT Default : ut only 


Source of Information : Input 
S for Output 


rpose: 
es this type of label (format-1) from other types (formats 2, 3, 


Ss, or writes the type of label specified by DLBL. If you use 
ignores thi field on input; on output, [OCS writes 1. 


T Default : Volume Serial Number of first 
volume of the file. Qutput only. 


Source of Information DLBL for Input 
DLBL/IOCS for Output 


Purpose: 

Provides a numeric Cor code) identification for this logical file. It 
contains the Volume Serial Number from the VOL label, and this uniquely 
identifies the volume/file relationship. In a multivolume file, the 
Cae label on each volume contains the Volume Serial Number of the first 
volume. 


Processing: 
IOCS checks» o 
use DLBL, I0OCS 
Volume Serial 


r writes, the file serial number specified 
ignores this field on input; on output, I0 
Number of the first or only volume. 
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DLBL/ZEXTENT Default ol 
Source of Information DLBL/IOCS 


Purpose: 
Loe ee the order of the volumes of data records in a multivolume logical 
ile. 


Processing: 

In a multivolume file you need to specify in DLBL the number of the first 
volume only. When you use DLBL, IOCS supplies 01 for the first volume. 
IOCS increases the number by 1 for each additional volume. IOCS checks» or 
writes, the number specified or updated. In DLBL specify a 4-digit EBCDIC 
number, which is converted to a 2-byte binary number in the label. 


DLBLZEXTENT Default Today's date 
Output only 


Source of Information DLBL for Input 
System for Output 


Purpose: 

Provides the date that the file was originally created. This can be used at 
a later time to determine how old the records are. Or, it can be used (Cin 
conjunction with, or in place of, generation number) to ensure that the 
desired edition of the file is selected for processing. 


Processing: 

On input, IOCS checks this date against that supplied by DLBL. 
YYDDD Cyear and day of the year), which is converted to a 3-by 
discontinuous binary number (Cydd) in the label. If you use DBL 
creation date in the label is not checked. 


Specify 
te 
BL; the 


On output, IOCS writes the system date that is available in the ; 
communication region of the Supervisor. You do not supply a creation date 
for an output file, in either DLBL. 
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DLBL/EXTENT Default 
Source of Information 

tput (Action P/N) 

cess Method Services 

for Output CAction W) 
Purpose: 
Indicates the date that the data records may be considered inactive. At that 
time, the label of the old file may be deleted from the VTOC, which, in 
effect, deletes the entire file and makes the extent(s) available for new 
data. Processing: 
On input, IOCS checks this date against that supplied by DLBL. If you use 
DLBL, this field is not checked. 
On output, IOCS first determines if the extent(s) specified for the new 
output file overlaps an existing file. If so, IOCS then checks the 
expiration date of the existing file by comparing this field in the old file 
label to the system date in the communications region of the Supervisor. Lf 
the old file has expired, I0CS writes the label(€s) for the new file in the 
VTOC. This label includes the new expiration date supplied by DLBL or DLBL. 
The extent(s) is then available for the data records of the new output file. 
If the old file has not expired, a message 18S given to the operator, who 
determines whether to overwrite the old data. The expiration date of a VSAM 
data space is for information only. A data space can only be deleted, 
whether it has expired or not, by an Access Method Services DELETE 
statement. 
In DLBL, specify yyddd (year and day of the year). 
In the DLBL Expiration Date field, you may specify either the date the file 


will expire, or a retention period for the file. For expiration date, 
specify yy/ddd (Cyear/day of the year). The day may have 1-3 digits. For a 
retention period, specify d-dddd (1-4 digits, 0-9999). If you omit this 
field in DLBL, IOCS adds a 7-day retention period to the system date in the 
communication region of the Supervisor and writes the resulting date. In 
each case, the expiration date (after calculation, if necessary) written in 
the label is a 3-byte discontinuous binary number. 


DLBL/EXTENT Default - 
Source of Information IOocS for Output 


Purpose: 

Provides a control of the number of separate areas (Cextents) established for 
this file, as represented by the Extent fields written in the format-l label 
(3 fields) and the format-3 label (13 fields). In a multivolume file, the 
count is accumulated separately for each volume. 


Processing: 

On input, IOCS ignores this field. On output, IOCS writes the accumulated 
count in this field, or gives a message to the operator and cancels the job 
if the count exceeds the allowable number. The maximum allowable count is: 
3 - for an ISAM file. (Because the master and cylinder indexes are combined 
into one area, a maximum of 3 areas are set up from 4 EXTENT statements. ) 

15 - for a DAM file with user-standard labels. (Because IOCS sets up one 
extra Extent field for the user-standard label track, 16 areas are set up 
from a maximum of 15 EXTENT statements. ) 16 - for a DAM file without 
user-Standard labels, and for a VSAM data space. 


SAM files may have any number of extents. 
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D7 DLBL/EXTENT Default : Blank. Output only 
Source of Information : IOCS for Output 
Purpose: 
Used by OS/VS for partitioned data sets. VSE does not use this field. 
Processing: 
On output, IOCS writes a blank. 


DLBLYEXTENT Default : Blank. Output only 


Source of Information : IOCS for Qutput 


Purpose: 
Reserved for future use. IOCS writes a blank. 


Indicates the Programming System under which this file is written. This can 
be of value when an installation uses more than one programming system. 


Processing: 
On input, I0CS ignores this field. On output, IOCS writes 
supplied in DLBL. If you use DLBL, IOCS writes: IBMDOSVS. 


DLBLYEXTENT Default 


the information 


DLBLYEXTENT Default : DOS/360 Version 3. Output only 
Source of Information : DLBL/IOCS for Output 
Purpose: 


Source of Information 


Purpose: 
Indicates the date of last access of this data set. 


DLBL/EXTENT Default : Blanks. Output only 
IOCS for Output 


Source of Information 


Purpose: 
Reserved for future use. IOCS writes blanks. 


D10B DLBL/ZEXTENT Default : DLBL/DTF 
Source of Information : - 
Purpose: : 
Indicates the number of physical blocks per control interval for the FBA 
device file. 


Dil DLBLYEXTENT Default : X"4000' 


Source of Information : DTF for Input 
DLBL/DLBL for Output 


Purpose: 


Verifies the type of organization used for this file. 


Processing: 

On input, IOCS checks this field against the DTF (CDTFSD, DTFDA> or 
DTFIS) that you specify. For an output file, nverts the code 
specified in DLBL Type of File, and writes thi i : If you omit this 
field in BLBL, IOCS writes X'4000'" in the labe 1 p 
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DLBL/ZEXTENT Default 7 
Source of Information IocS for Output 
Purpose: 


Used by OS/VS to define the type of records 
truncated, etc. DOS/VSE does not use this 


: ixed length, blocked, 
field. 

Processing: 

On output, IOCS writes a binary zero. 


Source of Information DTF/ EXTENT for Output 


Purpose: 
Indicates which optional areas are built for an ISAM file. This field is 
provided for use by VSE. 


Processing: ; 
IOCS checks», or writes, the appropriate code from the DTF specifications and 
extent information that you supply. 


Source of Information DTF/DLBL for Output 
Purpose: 


Tells the length of the blocks of logical records (Cand therefore, the length 
of a physical record). 


Processing: 

On input, I0CS refers to this field to determine the length of the blocks of 
records previously written in the file. On output, IOCS writes the block 
length from the DTF specification that you supply. 


Source of Information DTF for Output 


Purpose: 
Tells the length of each logical record. 


Processing: 

On input, I0CS refers to this field to determine the length of the logical 
records previously written in this file. On output, IOCS writes the record 
length from the DTF specification that you supply. 


Source of Information DTF for Qutput 


Purpose: 
Tells the length of the key area for each record (unblocked records) or 
block of records. 


Processing: 

On input, IOCS refers to this field to determine the length of the key area 
used in this file. On output, IOCS writes the key length from the DTF 
specification that you supply. 


Source of Information DTF for Output 


Purpose: 
Tells the location of the key field within the logical records, when blocked 
records are written in the file. 


Processing: 
On input, IOCS refers to this field to determine where the key field is 
located within each record. 


On output, IOCS writes the location of the high-order position of the key 
field from the DTF specification that you supply. 
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Source of Information IOCS 7 DLBL for Output 


Purpose: 
ea a that this is the last volume of a multivolume file that has been 
closed. 


Processing: 

On input, IOCS ignores this field. When an output file is closed, IOQCS 
writes 1 in this field of the label on the last (or only) volume of the 
file. For all other volumes, IOCS writes 0 in this field on an 
end-of-volume condition. 


Purpose: 
Invokes data set security to prevent problem programs from accidentally 
accessing a data secured file. 


Processing: 
On input, this field i d for the data sec 


ON, a message is operator stating 
being accessed. OQ i DSF is specified 
is set to l. Bit or all VSAM forma 
DLBL/EXTENT Default 

Source of Information 


Purpose: 
Indicates the type of request that was issued for the initial allocation. 


Bit 
0,1 01 Original request was in blocks 


2,3 (Reserved, binary zeros.) 


Original request was for a 
contiguous extent. 


Original request was for the 
maximum contiguous extent. 


Original request was for the 
five or less largest extents 
that are larger than or equal 
to a specified minimum. 


(Reserved, binary zeros.) 


DLBL/ZEXTENT Default = 

Source of Information IOcS for Output 

Purpose: 

Used by OS/VS to indicate the amount of storage requested at the end of each 
extent. VSE does not use this field. 


Processing: 
On output, IOCS writes blanks. 


DLBL/EXTENT Default = 
Source of Information I0cS for Output 


Purpose: 
Used by OS/VS to point to the t record of a seq 


las u 
partition-organization file. VSE does not use this 


Processing: 
On output, IOCS writes binary zeros. 
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DLBL/ZEXTENT Default 

Source of Information: 

Purpose: ; ; 
Indicates the starting position of the next sequential record relative to 
the End-of-Date Pointer if it is used, and contains a binary value to be 
used as a negative displacement. 

DLBL/EXTENT Default X'O1° Output only 


Source of Information EXTENT for Input 
EXTENT IOCS for Output 


Purpose: 
Defines the category of records (data, overflow, index, or user-~standard 


labels) for which this area is reserved. The area is specified by the 
Extent Lower Limit and Extent Upper Limit fields. 
C Processing: 


eer or writes, this label field with the extent type specified by 


If you use EXTENT and omit the type, this field is not checked on input; on 
output, IOCS writes X'Oi'. 


If you include user-standard labels, IOCS establishes an area for them. You 
do not include EXTENT for this area. IOCS uses the First Extent field 
(D22-D25) to define this extent, codes it Extent Type X'40" (blank), and 
numbers it Extent Sequence QO. If less than 3 extents are required for a 
file, IOCS writes X'00" in the Extent Type field of the unused Additional 
Extent fields (D26 and D300). 


DLBL/EXTENT Default 


Source of Information ENT for Input 
ENT IOCS for Output 


Purpose: 

Determines the proper order of the extent areas ina multiextent file. For 
a SAM, or DAM file, separate extents may be located on the same or different 
volumes. For an ISAM file, multivolumes may be used for the data records 
(prime data area), but on any one volume, the data records must be contained 
within one extent. ISAM indexes and the ISAM independent overflow area are 
separate extents, on the same volume as the prime data area or ona 
different volume than the prime data area. 


Processing: 

Cc For a SAM or DAM file, or VSAM data space, IOCS checks» or writes, this 
label field with the sequence number supplied by EXTENT. You may specify 
any sequence numbers you choose, but the numbers must be In ascending order. 
If you include user-standard labels, IOCS establishes an extent area and 
assigns it sequence number O (see Extent Type, field D22). 


If you use EXTENT for a SAM or DAM file, or for the creation of a VSAM data 
Space, and omit the extent sequence number, this field _ is not checked on 
input. On output IOCS writes Extent Squence O in the First Extent Field, 
and adds 1 for each subsequent Extent field used. Extent sequence 0 
represents the first EXTENT card or, if they are used, it represents the 
area for user-Standard labels. In the latter case, the first EXTENT card 
becomes Extent Sequence l1. 


es the 


For an ISAM file, IOCS processes this fi d the same way it process 
Lower and Upper Limit fields, You must include aaa for each 
5 


area and specify Extent Sequence Number Extent information mu 
supplied in a specified order. 


e 
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DLBL/EXTENT Default 
Source of Information EXTENT 


Purpose: 
Defines the beginning of a disk area allocated to this file. 


Processing: 

For a SAM input file, IOCS checks this field and the Upper Limit 
(D25/D29/D33) against the starting and ending addresses supplied 
IOCS makes the area specified by EXTENT available for processing 
equal to, or falls within, the limits defined by these label fiel 
not, a message is issued to the operator. If you omit EXTENT® fo 
eet Lgee IO0CS does no checking and makes available the area defi 

e a e e 


For a DAM input file, IOCS makes the 
does not check this field against th 


e 
For a SAM, or DAM output file, IOCS w 
address (lower limit) supplied by EXT 


efined by EXTENT available. 


area d 
TENT specifications. 
es 


re 
EX 
rit 
ENT 


» in this field the starting 
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For an ISAM file, processing af this field varies with the type of operation 
performed: 


ee Create: IOCS writes the starting address (lower limit) supplied by 


e LOAD Extent: I0CS checks this field against the lower limit supplied by 
EXTENT. If the limits are not the same, the job is canceled. If the prime 
data area is extended onto a new volume, IOCS writes the lower limit of the 
new extent specified by EXTENT. 


e RETRVE: This field determines the lower limit of the extent. If you use 
oe you need specify only Operation, Symbolic Unit, and Volume Serial 
umber. 


e ADD or ADDRTR: IOCS checks this field against the lower limit supplied by 
EXTENT. If the limits are not the same, the job is canceled. 


If an independent overflow area is established at this time, IOCS writes the 
lower limit of the new extent specified by EXTENT. 


If you include EXTENT for both a master index area and a cylinder index area 
in an ISAM file; IOCS combines the two areas into one extent and uses the 
lower limit of the master index for this field. 


For the creation of a VSAM data space, IOCS writes the starting address 
Clower limit) supplied by the EXTENT statement. 


In EXTENT, specify a Relative Track number (n=nnnnn). This is the 
sequential number of the track relative to cylinder 0, track QO: 


For 2311, Relative Track = 10 x cylinder number + track number. 
For 2314 or 2319, Relative Track = 20 x cylinder number + track number. 
For 3330, Relative Track = 19 x cylinder number + track number 
For 3340, Relative Track = 12 x cylinder number + track number. 
For 3350, Relative Track = 30 x cylinder number + track number. 
In EXTENT, for 23117231472319 specify: OOOCCCOHH where 
CCC = Cylinder number (000-199) 
= Head Cor track) number (00-09) for 2311; (00-19) for 2314 or 2319. 
IOCS converts the specification to CCHH for the label field. 


Because cylinder 0, track 0 on each volume must be reserved for labels and 
system use, never specify a lower limit of all zeros. 
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DLBLZEXTENT Default 
Source of Information : EXTENT 


Purpose: 
Defines the end of a disk area allocated to this file. 


Processing: 

For a SAM input file, IOCS checks this field and the Lower Limit field (D247 
D28/ D32) against the addresses supplied by EXTENT. IOCS makes the area 
specified by EXTENT available for processing if it is equal to, or falls 
within, the limits defined by these label fields. If not, a message is 
issued to the operator. If you omit EXTENT for a SAM input file, IOCS does 
no checking and makes available the area defined by the label. 


For a SAM or DAM output file, IOCS writes, in this field, the ending address 
Cupper limit) supplied by EXTENT. 


For an ISAM file, processing of this field varies with the type of operation 
performed: 


RENT Create: IOCS writes the ending address (Cupper limit) supplied by 


* LOAD Extent: I0CS checks this field against the upper limit specified by 
EXTENT. If the specified limit of either the cylinder index or the prime 
data area is beyond the upper limit in the label, IOCS changes the label and 
makes the new area available for records. If the prime data area iS 
extended onto a new volume IO0OCS writes the upper limit of the new extent 
specified by EXTENT. Under any other condition, the job is canceled if the 
limits do not agree. 


* RETRVE: This field determines the upper limit of the extent. If you use 
una you need specify only Operation, Symbolic Unit, and Volume Serial 
umber. 


e ADD or ADDRTR; I0CS checks this field against the upper limit specified by 
EXTENT. If the specified limit of the independent overflow area is beyond 
the upper limit in the label, IOCS changes the label and makes the new area 
available for records. If an independent overflow area is established at 
this time, IOCS writes the upper limit of the new extent specified by 
EXTENT. Under any other condition, the job 18 canceled if the limits do not 
agree. 


If you include EXTENT for both a master index area and a cylinder index area 
in an ISAM file, IOCS combines the two areas into one extent and uses the 
upper limit of the cylinder index for this field. For the creation of a 
VSAM data space, IOCS writes the ending address (upper limit) supplied by 
the EXTENT statement. 


In EXTENT, specify a Relative Track number (n-nnnnn) for the starting 
address, as described for label Fields D264/D28/D32 and the Number of Tracks 
Cn-nnnnn). From these, IOCS computes the upper limit. 


In EXTENT, for disk specify: OQOCCCOHH where: cCC = Cylinder number HH = 
Head Cor track) number 


IOCS converts the specifications to CCHH for the label field. 
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DLBL/EXTENT Default = 
Source of Information IocS for Output 


Purposes 

Provides the address of the next label for this file on this pack, if 
required, For an ISAM file, it points to a format-2 label. For a SAM/DAM 
file, or VSAM data space, it points to a format-3 label if more than three 


extents are used on this volume. 


Processing: 
On input, IOCS refers to this field to find the address of the next label, 
if any. On output, whenever a format-2 or format-3 label ts required for a 
file, IOCS finds a VTOC location for the label and writes its address in 
this Pointer field. IOCS always writes a format-2 label for an ISAM file. 
For a SAM/DAM file or VSAM data space, JOCS establishes a format-3 label if 
another EXTENT card is read after the format-l1 label if filled. If a 
SAM/DAM file or VSAM data space does not require a format-3 label, IOCS 

; writes binary zeros in this field. 


Figure 21 (Part 11 of 11). Format-l Label Fields 


FORMAT-3 LABEL LAYOUT AND CONTENT 


Displ. Field Length Content 


K1 4 Key code for continuation label(03030303) 
Written by IOCS 
K2 1 Type of extent, from EXTENT: 
O1 = data extent (default) 
80 = split cylinder extent 


Extent sequence number (3 or more) 


3 1 
es q Extent lower limit (€cchh for CKD, bbbb for Bi ; 
5 


A 
A 


6 

A 4 Extent upper limit (cchh for CKD, bbbb for F 
The fiel K2 to K5 are repeated three times as K6 —- K17>) to 
describe the extents 2, 3, and & of the key area. 


2c Dl 1 Continuation label code: EBCDIC 3, from IOCS 
The fields K2 to K5 are now repeated nine more times as D2 - D37;> 
to describe the nine extents of the data area. 


87 D38 5 Address of next contin.label (cchhr or Obbbb) 
or zeros. From SAM IO0CS only 


K 
K 
K 
d 
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DLBLYEXTENT Default : = 

Source of Information: : TIOcS 

REMARKS: 

Se eyo ce ic. ove eke this key from the keys (File Identification) 
DLBLYEXTENT Default Output only 


Source of Information: : Input 
S for Output 


REMARKS: 


Like the extents in the format-1 label, the first b CExtent Type) of each 
Extent See defines the category of records for whi this area is 
reserved. 


IOCS checks against», or writ ified by EXTENT: Type 
EXTENT Specifications Label j Data area with split 
cylinder (SAM) 8 in EXTENT j 


1 
If you use EXTENT and omit t type, this field is not checked on input; on 


output, I0CS writes Ol. 
TOCS writes 00 in the Extent Type fields of any unused Extents (2-13). 


Extent Types O02, 04, and 40, which may be written in a format-1 label, do 
not occur ina format-3 label. Types O02 and O4& apply only to ISAM files, 
which support three extents and the format-1 label only. Type 40 indicates 
user-standard labels, which precede the first data area extent for the file 
and therefore appear in the format-l label. 


DLBL/EXTENT Default : - 15 Output only 
I 


Source of Information: nput 
S for Output 


REMARKS: 


The second byte CExtent Sequence Number) of each Ext 
serves the same purpose as in the format-l1 label. I 
order of the extent areas in a multiextent file. 


ent field in this label 
t determines the proper 


IOCS checks against, or writes, the sequence number specified by EXTENT. If 
you use EXTENT and omit the extent sequence number, this field is not 
checked on input. On output, IOCS writes O for the first extent for the 
file Cin the format-1 label), and adds 1 for each succeeding EXTENT. Thus» 
the first extent sequence number in the format-3 label is 3. 


DLBL/EXTENT Default | : a 


Source of Information: : EXTENT*® for Input 

EXTENT for Output 
REMARKS: 
Bytes 3-6 (Lower Limit) of each Extent field define the beginning of a 
volume area allocated to this file. Your EXTENT specification and the 
processing of this field are the same as that described for the lower limit 
of a SAM/DAM extent in the format-1 label. 


Figure 23 (Part 1 of 2). Format-3 Label Fields 
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DLBLZEXTENT Default 


Source of Information: TX for Input 
T for Output 


REMARKS: 
Bytes 7-10 (Upper mit) of each Extent field define the end of a volume 
area allocated to Your EXTENT specification and the processing 
of this field are that described for the upper limit of a 
SAM/DAM extent in format-1 label. 
DLBL/EXTENT Default 3 Output only 
Source of Information: Iocs 
REMARKS: 

C Distinguishes this type of label (format 3) from other type 
4, and 5). IOCS writes a format-3 label on any volume of t 


requires more than three extents, as indicated by a series 
etre and user-standard labels, if used (see format 1, 
ie . 


Source of Information: IOocS for Output 
REMARKS: 


Provides the address of another format-3 label, if required for a SAM file 
DAM files support a maximum of 16 extents, which are defined by a format~-l 
label and one format-3 label. 


( On input, IOCS refers to this field to find the address of the next label, 
if any. On output for a SAM file, if another EXTENT card is read after a 
format-3 label is filled, IOCS establishes an additional format-3 label. 
IOCS finds a VTOC location and writes its address in this Pointer field. If 
one ee format-3 label is not required, IOCS writes binary zeros in this 
ie : 


Figure 23 (Part 2 of 2). Format-3 Label Fields 
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FORMAT~2 LABEL LAYOUT AND CONTENT 


Pret] OOOO 
Provides a code to distinguish this key from the keys (File Identification) 


K1 Name : Key Identification 
(00) 
of format-1 labels 


No. 1 
Content : X'o2" 

os Name : Address of 2nd Level Master Index 

No. of Bytes: 7 7 


of Bytes: 


Open/Close : X/- 
Functions : LOAD Create 
Source of Information : Iocs 
REMARKS: 


Content : Binary Zeros —- Applies to OS/VS only. 


Open/Close : X/- 
Functions : LOAD Create 
Source of Information : Iocs 


REMARKS: Used by OS/VS to provide the address (MBBCCHH) of the first track 
of the second level of the master index. 


Name : Last 2nd Level Master Index Entry 

No. of Bytes: : 5 

Content : Binary Zeros —- Applies to OS/VS only. 
Open/Close 3 X/- 

Functions : LOAD Create 

Source of Information : rIocs 


REMARKS: Used in OS/VS to provide the address (CCHHR) of the last entry in 
the second level of the master index. 


KS Name : Address of 3rd Level Master Ind. 
eee No. of Bytes: : 7 
Content : Binary Zeros —- Applies to OS/VS only. 
Open/Close 3 X/- 
Functions 3 LOAD Create 
Source of Information : Iocs 


REMARKS: Used by OS/VS to provide the address (MBBCCHH) of the first track 
of the third level of the master index. 


Figure 24% (Part 1 of 12). Format-2 Label Fields 
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Cig [OOOO 


K5 
C14) 
K7 
(24) 


Name 


No. of Bytes: 


Content 

Open/Close 
Functions 
Source of Information 
REMARKS: 


the third level of the master 


Name 


No. of Bytes: 


Content 

Open/Close 

Functions 

Source of Information 
REMARKS 

Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


Indicates the address of the 


Last 3rd Level Master Index Entry Address 
5 

Binary Zeros ~— Applies to OS/VS only. 

X7~ 

LOAD Create 

Tocs 


Used by OS/VS to provide the address (CCHHR) of the last entry in 


index. 


last 


(Reserved) 

11 

Binary Zeros 

X/- 

LOAD Create 

rocs 

Reserved for future use. 
Last Prime Track Address 
8 

DASD Address (CCCHHR) 

as 


prime track on the last prime cylinder. 


Name Format Identifier 

No. of Bytes: 

Content Format 2 Numeric EBCDIC 

Open/Close 

Functions LOAD Create 

Source of Information racs 

REMARKS: 

7A de this type of label (formats 2) from other types (formats 1, 3 


Format-2 Label Fields 


Figure 24 (Part 2 of 12). 
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Number of Index Levels 


Name 
No. of Bytes: : 1 
Content : 1 


Cylinder Index 

= Cylinder Index and Master Index 
Binary 
X/- 
LOAD Create 


DTFIS 


NS 
ou 


Open/Close 


Functions 


Source of Information 


REMARKS: 
A cylinder index is always required. Also» you may specify a master index 
(DTFIS MSTIND), if desired. 


Name : High Level Index Development Indicator 
No. 1 
Content X'O2' 
X/- 
LOAD Create 
Source of Information tocs 


REMARKS: Used by OS/VS to indicate that a master index is used and to tell 
the number of tracks reserved for it. ' 


of Bytes: 


Open/Close 


Functions 


Does Name First Data Record in Cylinders 
| No. of Bytes: 3 

Content DASD address (CHHR) 
Open/Close X/- 
Functions LOAD Create 
Source of Information DTFIS + Calculation 
REMARKS: 
Provides the address of the first data record in each cylinder. This record 
follows the track index, which is written at the beginning of each cylinder. 
I0CS uses the record key length, specified by DTFIS KEYLEN; in the 
calculation of the length of the track index. 

ee Name Last Data Track in Cylinders 
No. of Bytes; 2 
Content DASD Address (HH) 
Open/Close : X/- 
Functions : LOAD Create 
Source of Information : DTFIS + Calculation 

D5 REMARKS: 

(32) Indicates the last track that can be used, in each cylind 
organized file of data records. If this is other than 09 
overflow area follows the organized file. IOcS determine 
the size of the cylinder overflow area that you specify i 


Figure 24 (Part 3 of 12). Format-2 Label Fields 
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7 

D7 

- 
DS 
¢ : 
D9? 
7 


Figure 29% (Part 4@ of 12). 


Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 


REMARKS: Used by OS/VS. 
cylinder overflow area. 


Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


Number of tracks for Cylinder Overflow 


1 

Binary Zeros —- Applies to OS/VS only 
X/- 

LOAD Create 

tocs 


Contains the number of tracks allocated to each 


Highest 'R‘* on High Level Index Tracks 
1 

Record Number 

X/= 

LOAD Create 

DTFIS + Calculation 


Provides the number of the last record on each track of the master and/or 
cylinder indexes. IOCS uses the record key length, specified by DTFIS 


KEYLEN, to determine how many 


Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


index entries can be written on each track. 


Highest 'R' on Prime Data Tracks 
1 

Record Number 

X/- 

LOAD Create 

DIFIS + Calculation 


Provides the number of the last data record, or block of records, on each 


full track of the organized file 


in the prime data area. IOCS uses the 


DTFIS specifications for record length, key length, and blocked records to 
calculate how many physical records can be written on each track. The 


number of the last data record 
the others if data records and 


Field D110). 

Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


Provides the number of the last record on 
IOCS uses the 


independent overflow area. 
length and key length in the calculation o 
be written on an overflow track. 


Appendix Cs: 


in the first track of the file differs from 
track index entries share the same track (see 


Highest ‘'R' on Overflow Tracks 
1 

Record Number 

X/- 

LOAD Create 

DTFIS + Calculation 


track of the cylinder and/or 
S specifications for record 
e number of records that can 


Format~2 Label Fields 


DASD and TAPE Labels 123 


Licensed Program - Property of IBM 


Name 

No. of Bytes: 

Content Record Number 

Open/Close X/- 

Functions LOAD Create 

Source of Information DTFIS + Calculation 

REMARKS: 

If data records and track index entries are written on the same track 
(shared track), this field provides the number of the last data record on 
this track. IOCS uses the DTF specifications for record length, key length, 
and blocked records to determine how many phySical data records can be 
written after the track index on the shared track. 

Name "R®' of Last Date record on Unshared Track 
No. of Bytes: l 

Content Record Number 

Open/Close X/- 


Functions LOAD Create 


Source of Information DTFIS + Calculation 


REMARKS: 
Indicates the record number of the last data record on an unshared track of 
the track index. 


Name Highest 'R' on Independent Overflow Track 
No. of Bytes: 1 
Content Record Number 


Open/Close X/- 


Functions - 
Source of Information - 
REMARKS: 


Indicates the highest possible record number for independent overflow tracks 
with format F records. 


Figure 2% (Part 5 of 12). Format-2 Label Fields 
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fem] OOOO 
Name Tag Deletion Count 
No. of Bytes: : 2 
Content Number of records. Binary 
Open/Close -/X% 
Functions RETRVE 


Source of Information Count you accumulate in filenameT 


REMARKS: 

Provides a count of the number of records you identify (tag) for deletion. 
As you tag a record during a retrieve operation, you should add 1 to the 
counter addressed as filenameT. In subsequent retrieve operations, the 
count is read from the label back into filenameT, and additional tagged 
records can be added. The delete option is not supported by VSE. You must 
provide coding to test for records tagged for deletion. VSE passes this 
field between the format-2 label and the DTF. You can use this statistic 
Calong with those in Fields D113, D16, D27, D28, and D293) to determine 
whether the file should be reorganized. 


Name Non-First Overflow Reference Count 

No. of Bytes: 3 

Content Number of random references. Binary 
Open/Close —-/X 

Functions RETRVE 

Source of Information IOCS: Count in filenameR 

REMARKS: 

Provides a count of the number of times a READ instruction causes a search 
of the overflow area(s) for a record that is the second or higher in an 
overflow chain. IOCS accumulates this count in filenameR during a retrieve 
operation. In subsequent retrieve operations, IJOCS reads the count from the 
label back into filenameR, and adds to it as required. You can use this 
statistic Calong with those in Fields Dl2, D16, D27, D28&, and D293) to 
determine whether a file should be reorganized. 

Name : Number of Bytes for Highest Level Index 
No. of Bytes: : 2 

Content Size of master index. Binary 

Open/Close X/- 

Functions LOAD Create 

Source of Information DTFIS + Calculation 

REMARKS; ; 

Provides the size of the master index and thus indicates how many bytes of 


main storage are required for this index. I0CS calculates the size from the 
EXTENT limits and DTFIS KEYLEN specification. 


Figure 24% (Part 6 of 12). Format-2 Label Fields 


f Appendix C: DASD and TAPE Labels 125 


Name 

No. of Bytes: 
Content 
Open/Close 
Functions 
Source of Information 
REMARKS: 

this from the EXTENT 


Name 


of 
l 


t 
im 


1 


No. of Bytes: 
Content 
Open/Close 


Functions 
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Number of Tracks for Highest Level Index 
1 

Tracks of master index. Binary 

X/—- 

LOAD Create 

EXTENT 


uired for the master index. IOcS obtains 
xtent Sequence O. 


Prime Record Count 

4 

Number of logical records. Binary 
X/- 

LOAD/ ADD 


Source of Information IOCS: Count in filenameP+4& or filenameP 


REMARKS: 

Provides a count of the logical records written in the organized file in the 
prime data area(s). In a multi~volume file, this count is a total of the 
logical records on all volumes. During a LOAD operation, IOCS accumulates 
this count in the filename P+t+4. For an ADD operation, I0OCS reads this count 
into filenameP and updates it to include the added records. You can make 
note of the count and use it during a retrieve operation to verify that all 
records are read. You can also use this statistic Calong with those in 
Fields pee D13, D27, D2&, and D29) to determine whether a file should be 
reorganized. 


Figure 2% (Part 7 of 12). Format-2 Label Fields 
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No. of Bytes: 


Content : o r filled area: 


aning 
has been successfully closed 


Last block full 
therwise each bit is OFF (0) 


Open/Close -/X 
Functions : LOAD/ ADD 
Source of Information : Iocs 
Cc REMARKS: 
If bit 2 is OFF, the file is being used for an ADD or ADDRTR. If an OPEN is 


then issued to the file for ADD or ADDRTR when HOLD=YES, the problem program 
is canceled because another program is already using the file for ADD or 
ADDRTR. If an ADD or ADDRTR program terminates without issuing a CLOSE to 
the file, bit 2 remains OFF. Bit 2 should be set ON by issuing a CLOSE to 
that file in in any job in which ADD or ADDRTR is specified and HOLD does 
not equal YES. Bits 6 and 7 indicate that the organized file completely 
fills the prime data area. Bit 6 is ON when the last track that can be used 
for data records is filled and the end-of-file record is written on the last 
track of the area. When blocked records are specifieds the last block may 
or may not be filled. If it is not, bit 7 is OFF and more logical records 
may be added to the last block. When the last block becomes full, bit 7 is 
turned ON. Thus, when both bits 6 and 7 are ONs any additional records for 
the file are written in an overflow area. 


Cc Name : Address of Cylinder Index 
No. of Bytes; ; 7 
Content DASD address (MBBCCHH) 
Open/Close ; X/- 
Functions : LOAD Create 
Source of Information : EXTENT 
REMARKS: 
this address fron the starting. eddress youcsuepiy in the cylinder index” 
CExtent Sequence 1) EXTENT statement. 
‘= Name : Address of Lowest Level Master Index 
No. of Bytes: : 7 
Content : DASD address of index (MBBCCHH) 
Open/Close : X/- 
Functions : LOAD Creste 
Source of Information : EXTENT 
CaP) Provides the address of the first track of the master index. IOCS obtains 


this address from the starting address you supply in the master index 
CExtent Sequence 0) EXTENT statement. In VSE, this field», and Field D220; 
are identical whenever a master index is specified. The two fields are 
provided for use by OS/VS, which provides for three levels of master 
Indexes. If a master index is not specified, this field contains binary 
zeros. 
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Address of Highest Level Index 
No. of Bytes: 7 
Content : DASD address of master or 


cylinder index (MBBCCHH) 
M = Extent sequence number 


Open/Close X/- 
Functions LOAD Create 
Source of Information EXTENT 


REMARKS: 

Provides the addr 
(same as Field Dl 
address of the cy 
D19, are provided 
master indexes. 


Name : Last Prime Data Record Address 
No. of Bytes; 2 8 
Content : DASD address (MBBCCHHR) 
M = Extent sequence number 
Open/Close 3 -/X 
Functions : LOAD/ ADD 
Source of Information : Iocs 
REMARKS: 
Provides the address of the last record (or block of records) written in the 
organized file in the prime data area. This address is first written during 
a LOAD operation and then updated, if necessary, during a LOAD Extend or ADD 


operation. 


ess of the first track of the master index, if specified 
9). If a master index is not used, this field contains the 
Enger index (same as Field D118). This field, and Field 


r use by OS/VS, which provides for three levels of 


D22 Name 3 Last Track Index Entry Address 
eee No. of Bytes: : 5 
Content 3 DASD Address (CCHHR) 
Open/Close : -/X 
Functions H LOAD 
Source of Information : Iocs J 
REMARKS: 


Provides the address of the last normal entry in the last track index 
currently written for the file. This address is first written during a LOAD 
Create operation, and then updated during a LOAD Extend Operation. 
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ried] CCC 


Name 
No. 
Content 


of Bytes: 


Open/Close 

Functions 

Source of Information 
REMARKS: 

Provides the address of the 
address is written during a 
LOAD Extend operation. 

Name 
No. 
Content 


Open/Close 


of Bytes: 


Functions 

Source of Information 
REMARKS: 

Provides the address of the 
If a master 
This address 
updated, if necessary, 
Name 
No. 


Content 


of Bytes: 


Open/Close 
Functions 
Source of Information 


REMARKS: 

Provides the address of the 
area. This address 
end-of-file record 
overflow area. he address 


index has not been specified, 
is first written during a 
during a LOAD Extend operation. 


is first wri 
is entered as the first record of the 


Last Cylinder Entry Address 
5 

DASD Address (CCHHR) 

-/X 

LOAD 

tocs 


in the cylinder index. This 
and then updated during a 


ntry written 


last e 
LOAD Create operation, 


Last Master Index Entry 
5 
DASD Address (CCHHR) 
-/X 
LOAD 
Iocs 
last entry written in the master index, if used. 


this field contains binary zeros. 


LOAD Create operation, and then 


Last Independent Overflow Record Address 
8 


DASD Address (MBBCCHHR) 
M = Extent sequence number 


-/X 

LOAD Create/ ADD 

Iocs 

in the independent overflow 
tten during a LOAD Create operation, when an 


independent 
if records are transferred to the 


last record written 


is updated 


independent overflow area during an ADD operation. 


Name 

No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: Used by OS/VS to 


available in the last track 
area. 


Figure 24 (Part 10 of 12). 
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Bytes Remaining on Overflow Track 
2 

Binary Zeros. 
X/- 

LOAD Create 
rocs 


Applies to OS/VS only. 


indicate the number of bytes that are still 


in use at this time in the independent overflow 
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Name Number of Independent Overflow Tracks 
No. of Bytes: : 2 

Content : Number of unused tracks. Binary. 
Open/Close -/X 

Functions 7 ADD 

Source of Information : IOCS: Count in filenamel. 

REMARKS: 

Provides the number of tracks that are still available in the independent 
overflow area. IOCS maintains this count in filenameI during an ADD 
operation. In subsequent ADD operations, IOCS reads the count from the 
label back into filenamelI, and updates it as required. You can use this 


statistic Calong with those in Fields Di2, D13, D16, D28 and D293) to 
determine whether a file should be reorganized. 


Name : Overflow Record Count 

No. of Bytes: 2 

Content : Number of records. Binary 
Open/Close : -/X 

Functions : ADD 

Source of Information : IOCS: Count in filenameO. 
REMARKS: 


Provides a count of the records written in all the overflow areas for the 
file (cylinder overflow areas and/or independent overflow area). Iocs 


accumulates this count in filenameO during an ADD operation. In subsequent 
ADD operations, IOCS reads the count from the label back into filenameO and 
adds to it for additional overflow records. You can use this statistic 
Calong with those in Fields Dl2, D113, D16, D27, and D29) to determine 
whether a file should be reorganized. 


Name : Cylinder Overflow Area Count 

No. of Bytes: 2 

Content : Number of overflow areas. Binary 
Open/Close : —-/X 

Functions ADD 

Source of Information : IocS: Count in filenameA. 

REMARKS: 

Provides a count of the cylinder overflow areas that have been filled. rocs 
accumulates this count in filenameA during an ADD operation. In subsequent 
ADD operations, IOCS reads the count from the label back into filenameA, and 
adds to it as required. You can use this statistic (along with those in 


Fields D12, D13, D116, D27, and D28) to determine whether a file should be 
reorganized. 
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Name 
No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


Name 


Contains the address 


No. of Bytes: 

Content 

Open/Close 

Functions 

Source of Information 
REMARKS: 


Dummy Track Index Entry 
3 

DASD Address (CHHR) 

X/- 

LOAD Create 


CHHR) of the dummy track index entry. 


Pointer 
5 


Binary Zeros. Applies to OS/VS only. 
X/- 


LOAD Create 
Iocs 


Used by OS/VS to provide the address (CCHHR) of a format-3 label 


if more than three extents are used on this volume. VSE does not support 
more than three extents for an ISAM file. 


Figure 24 (Part 1l2 of 12). 
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FORMAT-4& LABEL LAYOUT AND CONTENT 


Every field in this label, except the VSAM indicators (D9A), is 
written by DSF at initialization time. 


Disp. Field Length Content 


1 2c Key code for VTOC label: 44 m 
1 1 VTOC label identifier: EBCDIC 4 
2 5 Used by OS/VS 
3 2 Number of available file label spaces 
in VTOC at initialization (tracks x cylinder 
minus 2) 
G Address of next alternate track (cchh), 
for FBA: zeros. From DSF 
Number of alternate tracks left. For FBA zeros 
From DSF. 
Flags: Bi 
Bi 
Bi 


times 
C e 


always on 
Volume reserved for emulators 


0 
3 e « 
5: VTOC being updated by VSAM 
Extent count. Always 1. VTOC is 1 extent 

Reserved 


CKD device constants: (CFBA: zeros) 
Number of cylinders 

Tracks per cylinder 

Track length 

Overhead bytes for Ix 

Overhead bytes for L* 

Overhead bytes for Kx 


I or L value*® has two bytes for 3350 
7: A tolerance is added to each record 
except the last on a track 

Tolerance®*® per device type 
Number of labels on VTOC track per device 
Reserved 

VSAM indicators, from VSAM catalog routines 
Time when last data space was added 

Ownership byte: Bit O: Owned by VSAM catalog 
Number of first track of CKD catalog recovery 
area, for FBA zeros 

Used by OS/VS 

Number of first block of FBA catalog recovery 
area, for CKD zeros 

Reserved 

Extent type: O01 for VTOC e 

Extent sequence number: 00 has 1 extent) 
Start address of VTOC (Clab 

End address of VTOC. Used 

zeros 


t 
t 
t 
u 


n 
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User-Standard File Labels on Disk 


Figure 26 shows user-standard disk file labels (Cheader and trailer). 


Displ, Field Length Content 
a or UTL 


abel sequence number: to 8 for header labels 
f to 7 for trailer label 
Same as field Kl 
Label sequence number: to 8 for all 
User's label informatio 


Figure 26. User-Standard Disk File Labels (Header and Trailer) 


Source of Information: 


REMARKS: 

This field identifies the label ser-standard header (UHL) or trailer 
CUTL) label. It is written in st three positions of both the key and 
data areas of the label record. t you can refer to this field to 
determine whether a header or t is to be processed. On output, 
IOCS provides the information ( for this field. 


Source of Information: 
REMARKS: 


Indicates the seq j l within this header label set CUHL) or 
trailer label set . i is written in the fourth position of 
the key area of t é User-standard header labels are numbered 
UHL1-UHL8. - i ls are numbered UTLO-UTL?7. This field 


iS processed with t ier to completely identify the 
user-Standard label 


Source of Information: 


REMARKS: 

Indicates the sequence of thi within this header label set (UHL) or 
trailer label set CUTL). Thi j is written in the fourth position of 
the data area of the label r User-standard header and trailer labels 
are numbered UHLI1-UHL8 and U ‘ This field is processed with the 
Label Identifier to complete i ify the user-standard label. 


Source of Information: 


REMARKS: 
Cc Provides a means for you to label your SAM/DAM file with any information you 
need in addition to that supplied by the standard labels. 


Figure 2/7. User-Standard Label Fields 


User-standard labels may be included for SAM or DAM files. VSAM and ISAM 
do not support them. 


User-standard labels are header labels located and processed before the 
data of the file, and trailer labels located before and processed after 
the data of the file 


These labels have a 4-byte key area and an 80-byte data area. Both the 
key area _ and the first four bytes of the data area contain UHLn or UTLn 
the remaining 76 bytes of the data area contain user-chosen data. A 
maximum of eight header and eight trailer labels may be written to 
describe a file. 

There is always one header and one trailer label more written than 
specified. This extra label has only a 4& byte key area and no data area. 
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An example of a file for which five header labels and four trailer 
labels were specified is shown in Figure 28 on page 134. 


F 
d 


76 bytes of label data fields 


+ 76 bytes of label data fields 


PANE UPON 


UH 
UH 
UH 
UH 
UH 
UT 
UT 
UT 
UT 


z.cCccEecccckccce 
=—4q 4—4— 494 TC TL TTT 

(on od el De oe ee eel ed eed ed eed ee oe 
ZTBRWNRORURWAS 
Perr erererr 


re follo 


Figure 28. User-Standard Disk File Labels (5 UHLS and @ UTLS 
Specified) 


If only header labels are specified, one UTLO label without data is 
written by the system. An example is shown in Figure 29 where only 27 
header labels were specified. 


Label# Key Area (4 bytes) Data Area (80 bytes) 
+ 76 bytes of label data fields 


1 UHLI 
2 UHL2 
3 UHL3 ss 
Gq 
5 
H 


ere follo 


Figure 29. User-Standard Disk File Labels (3 UHLS Specified) 


You can include definitions or descriptions of your file in addition to 
those provided by the standard labels. For example, you may want to 
identify end-of-volume as opposed to end-of-file conditions, or you may 
have subcategories that you want to define for your files, or you may 
want to maintain an audit trail in these labels without the system 
security standards. 


LABEL FIELDS FOR DISKETTE 


Volume Labels on Diskette 


Figure 30 shows the format of a diskette volume label. 


Displ. Field Length Content 


Di Label ID: VOL 

Ignored by VSE 

Volume serial number from EXTENT 
Accessibility indicator: S or Blank. 
Reserved 

Name or code of volume owner 
Reserved 

Label standard level: W 


3 
1 
6 
I 
1A 
E 
ic 
1 


Figure 30. Diskette Volume Label 
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Source of Information: System 


Purpose: 
Identifies the standard volume label. This field is written in the first 
three positions of the volume label record. 


Processing: 
On both input and output, IOCS checks this field to verify that a standard 
volume label 1s present on the volume. 


Source of Information: System 


Purpose: 
Indicates the sequence of this label within a volume label set; must contain 
a 


Processing: 
This field is processed in conjunction with the label identifier, to 
completely identify the volume label. 


Source of Information: EXTENT 


Purpose: 
Provides a unique ication for i generally assigned 
when the diskette i t received i i i 


Processing: 
On both input and output, IOCS checks this field a i the number supplied 
by the user in the Volume Serial Number field of E If no operand is 
eooe ews TOCS assumes the correct volume is moun d does not check 

is ie ; 


Source of Information: 


Purposes: 
Provides a code which indicates that additional qualification is needed 
before a volume can be processed. 


Processing: 

If the volume is secure, an operator message is written any time a file is 

to be read or written on this volume. The operator must then make the 

SepEOpE vets response. For more information see 'VSE/Advanced Functions 
essages. 


Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Purpose: 
This field specifies the owner of the volume. 


Processing: 
On both input and output, IOCS ignores this field. 


Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Figure 31 (Part 1 of 2). Diskette Standard Volume Label Fields 
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Source of Information: : System 


Purpose: 
Identifies the version of label standard to wh 


ch the labels and data 
formats on this volume conform; must contain ‘ 


i 
WwW’ 
Processing: 


I0CS checks this field on both input and output; if not a 'W", job is 
terminated with a message. 


Figure 31 (Part 2 of 2). Diskette Standard Volume Label Fields 


A diskette volume has one volume label of 80 bytes. It is located on 
track O, sector 7 and begins by VOL. 


IBM-Standard File Labels on Diskette 
Figure 32 shows the format of the diskette file label. 


ld Length Content 


Label ID: HDR 

Label sequence number: Il 
Blank 
File-ID from DLBL or system 
Blanks 

Record length. From IQCS 
Blank 
sere address of extent: Track and sector. 

rom 
Blank 

End address of extent: Track and sector. 
From IOCS 
Blank 
Bypass byte: B or blank: B = job ends on input 
Security byte: S or blank 
Write protection byte: P or blank 
Interchange level: blank= sector length 128, 

unblocked, unspanned, 
sequential | 
non-blank= job ends on input 
Volume byte: blank= file complete on this 
volume 
C= file continued on next 
volume 
L= file ends on this volume 

Volume sequence number 
Creation date: YYMMD 
Blanks | 
Expiration date: Default= 7 days after output 
Verify byte: V or blank 
Blank 
End of data address 
Blank 


Displ. Fi 


WrwoOo~ MRK ADBACTWNHLWod 
Pees RO OOUDoOOOOo 


WDPWNeS Os G~ Ain Pwr 
———eee Ue Oe UO Oe 


NPRIMIPORO BORD here 
OoOooo 2 


RQ 
o 
| 
-~ 
Oo 


PADDR AWN 
TY wOmiuno 
YUCOUDUOOOCND 
PO BD A RO BD fb bee 
PWN OwO~ 
=e OO AR 


Figure 32. Diskette File Label 
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Source of Information; System 


Purpose: 7 
Identifies the Header label; must contain '‘'HDR". 


Processing: 
IocS checks this field on input, writes it on output. 


Source of Information: System 


Purpose: 
Indicates the sequence of this label within a header label set; must contain 
a ‘l'. 


Processing: 
IOCS checks this field on input, writes it on output. 


Source of Informations: 


4 Purpose: 
Reserved for future use; should contain blanks. 
Source of Information: DLBLZIOCS 


Purpose: 
File ID permits you to identify your logical file. 


Processing: 

You can specify the file to be processed in the corresponding field of the 

DLBL. If you omit this field, IOCS uses the DTF name specified in the DLBL 
Filename field. On input, IOCS searches the VTOC for this identification. 

On output, IOCS writes the identification specified Cin File Identification 
or Filename) in the label record. If this name is the same aS an unexpired 
or write-protected file on the diskette, the job is terminated. 


( Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Source of Information: Iocs 


Purpose: 
Contains length of the data records recorded in this file. 


Processing: 
For an input DTFPH file, I0CS 
the Read CCW. On output, he 


this field to set up the length field in 
sets up this field. 


uses 
Iocs 


Source of Information: 


: Purpose: 
Reserved for future use; should contain blanks. 


Source of Information: : Iocs 

Purpose: 

Defines the beginning of the diskette area allocated to this file. 
Processing: 

For an input file, IOCS makes available the area defined by the label. For 
an output file, IOCS writes, in this field, the starting address (lower 
limit) of the file. This address will be the address of the first record of 


the first track following the last unexpired or write-protected file on the 
diskette. IOCS ignores any values specified on the EXTENT card for both 
input and output files. 


Figure 33 (Part 1 of G4). Diskette HDR 1 Label Fields 
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Source of Informations 


Purpose: 
Reserved for future use; should contain blanks. 


Source of Information: Iocs 


Purpose: 


Defines the end of the diskette area allocated to this file. 


Processing: 

For an input file, IOCS makes available the 
an output file at OPEN time, IOCS writes, j 
last record on the diskette (73026). 

to be the address of the last record 
specified on the EXTENT card for both 


Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Source of Information: : Iocs 


y the label. For 
he address of the 
updates this field 
nores any values 


is to be interchanged. 


s 
terminates the job on input if this field 
IO0CS creates this field as a blank. 


ource of Information: Iocs 
Purpose: 


to access this file. 


is non~blank. 


For an output 


Indicates whether or not additional qualifications must be supplied in order ) 


Processing: 

For an input file, if thi 

The operator must reply ° 
For an output file, if t 

created as a secure file; 


e is an ‘'S', an 
to access the f 
er specifies (Ci 
will create th 


Ss y 
YES? i 
h n 


1 


b 
S 
0 


t 
E 
e us 
Tocs 
Source of Information: : Iocs 


Purpose: 


Indicates whether or not a file may be overwritten. 


Processing: . 
For input file 


es this field. 
overwritten. 


Figure 33 (Part 2 of @). Diskette HDR 1 Label Fields 
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is written. 


DTF) the file to be 
as an 'S". 


r For output files, if the user 
indicates the file is to be write-protected, IOCS puts a P 
in this field. i is created write-protected, it cannot be 


C 


Licensed Program - Property of IBM 


i 


Source of Information: Iocs 


Purpose: 
Identifies the following file attributes; 


Physical Record Length = 128 bytes 
Record Length —- Fixed = 128 bytes 


Record Attributes - unblocked/ unspanned 


File Organization ~ Sequential 


Processing: 
On both input and output, IOC 
a blank. IOCS will create th 
is not blank on an input file 


s field as a blank on output. If this field 


S assumes the above attributes if this field is 
i 
» the job will be terminated. 


Source of Information: Iocs 


Purpose: 


Indicates whether a file is complete on this volume, continued to another 
volume, or completed on this volume: ($u8$S$2)$u ~- file complete on this 
eoaee C - file continued to another volume L —- file completed on this 
volume. 


Processing: 


On input, JOCS checks this field to ensure that this indicator is correct. 
The only correct values are: ($u8$S$2)$u, for a single volume file; C for all 
but the last volume of a multivolume file; and L for the last volume of a 
multivolume file. On output, IOCS will set this indicator to the proper 


value based on the type of file being created. 
Source of Information: 


Purpose: 
Indicates the order of a volume in a multivolume file, relative to the first 
volume of that file. 


Processing: 

On input, if the DTFDU VOLSEQ parameter is specified, IOCS will check that 
the volume sequence numbers of a multivolume file are in consecutive, 
sequential, ascending order, starting with 1. On output I0CS will 
automatically create consecutive, sequential, ascending sequence numbers for 
a multivolume file (starting with 1). 


Source of Information: : IocS/System 


Purpose: 
Indicates the date the file was created; the format is YYMMDD. 


Processing: 

On input, IOCS ignores this field. On output, IOCS creates this field equal 
to the current system date. 

Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Figure 33 (Part 3 of 4). Diskette HDR 1 Label Fields 
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Source of Information: : IOCS/ EXTENT 

Purpose: 

Indicates the date this file may be purged; the format is YYMMDD. 
Processing: 

On input, IOCS ignores this field. On output IOCS creates this field equal 
to the expiration date specified on the EXTENT card. If a retention period 
is specified, the expiration date is calculated from that. If no date is 


specified, IOCS creates this date equal to seven days from the current 
system date. When creating an output file, IOCS deletes expired and 
non-write-protected files which begin after the last unexpired or 
write-~protected file on the volume. 


D21 Source of Information: $ IOCS 
Purpose: 
Indicates whether or not data has been subjected to a verification 
procedure. 


Processing: 
IOCS ignores this field on both input and output. 


D22 Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


D23 Source of Information: Iocs 
Purpose: 


Contains the address of the next higher consecutively numbered unused 
record; the format is CCHHR. 


On input, IOCS supplies thi 1 s the actual end-of-data address. On 
output, IOCS creates this f 1 he actual end-of-data address. 


D24 Source of Information: 


Purpose: 
Reserved for future use; should contain blanks. 


Figure 33 (Part © of @). Diskette HDR 1 Label Fields 


The IBM-standard file label on diskette is 80 bytes long. The key area 
of 4 bytes always contains the characters HDRI1. The 76 byte data area 
contains the start and end address of the file or of the extent of a 
file on this volume. As only one extent of each file is ona diskette, 
no continuation labels are needed. 


All IBM-standard file labels for all files on a diskette volume are 
stored in the VTOQC on track O, sectors 8-26. 


Only IBM-standard file labels are supported on diskettes. 


LABEL PROCESSING FOR TAPE FILES 
STANDARD LABELS, INPUT FILE 


VOL1 Label 


1) must be the first record on the reel 


The standard volume labe L 
STD) are specified. 


1 ¢ 
when standard labels (CFILAB 


The VOGL1 label can be written by the IBM-supplied utility program, 
Initialize Tape. It is generally written once, when the reel of tape is 
first received in an installation. At that time, a permanent volume 
serial numbrs is assigned to the reel and written on it as part of the 
volume label. This provides a permanent identification of the reel, as 
long as it is used for files with standard labels. Following the VOL1 


VO 
L= 
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label, Initialize Tape writes a dummy HDR1 label and a tapemark. Either 
IBM or American National Standards Institute, Inc. labels may be 
specified in the Initialize Tape program. 


Whenever the tape reel is positioned at the load point for processing 
the first or only volume of an input data file Cor multifile), IOQCS 
reads and checks the VOL1 label against the File Serial Number supplied 
by the user in TLBL. If an error is detected, a message is given to the 
operator. The operator may mount the correct volume, continue 
processing with the mounted volume Cif your system does not have data 
protection), or terminate the job. 


If TLBL is used and the File Serial Number is not specified, IOCS 
ete that the correct volume is mounted and does not check the VOL1 
abe 


In a multivolume file, the VOL1 label of succeeding volumes after the 
first one processed is not checked (see "Input File, Multivolume File™). 


If any additional volume labels (VOL2—VOL8) follow a VOL1 label, JOCS 
bypasses them. Similarly, IOCS bypasses additional user volume labels 
CUVL1—UVL9) on an ASCII tape file. 


HDR1 Label 


IOCS identifies the appropriate file to be processed by reading the HDR1 
label and comparing the File Serial Number, the Volume Sequence Number, 
and the File Sequence Number in the label, to those numbers supplied by 
TLBL. If the specified header label cannot be found, a message is 
issued to the operator. The operator must mount the correct volume, or 
terminate the job. 


IOCS checks fields 3 and 7—10 (describ 
against information supplied in TLBL. 
READ=BACK has been specified. 


ed in Figure 38 on page 162) 
Fields 11—14¢ are ignored, unless 
If the TLBL minimum specification (File Name only) is given, I0OCS 
assumes that the correct file is positioned for processing and does not 


check the HDR1 label. 


In a multivolume file, the HDR1 label on each volume after the first one 
processed is checked against the TLBL information that has been updated 
by IOCS where necessary (see "Input File, Multivolume File™). 


If any additional HDR labels C(CHDR2—HDR8S for EBCDIC files or HDR2—HDR9I 
for ASCII files) follow an HDR1 label, IOCS bypasses them. 


If any user-standard labels (UHL1—UHL8 for EBCDIC files or UHLa f 
ASCII files) follow the HDR label(€s) and if DTFMT or DTFPH LABADDR 
has been specified, IOCS branches to the user's label routine. If 
IOCS positions the tape at the first date record. 


r 
Name 
no 


EOF1/EOV1 Label 


IOCS reads an EOF1 or EOVI1 trailer label after the tapemark that follows 
the last data record of a file or volume. 


EOF1 indicates to IOCS that an end-of-file condition exists. EOV1 
indicates to IOCS that an end-of-volume condition exists (see "Input 
File, Multivolume File™). 


For either label, IOCS checks the Block Count field only. 


If any additional trailer labels (for EBCDIC files EOF2-——EOF8 or 
EQV2—EOV8; for ASCII files EOQF2—EOF9 or EOV2—E0V9) follow an EOF1 or 
EOV1 label, IOCS bypasses them. 

If any user-standard trailer labels (UTL1—UTL8 for EBCDIC files or UTLa 
for ASCII files) follow the EOF or EOV label(€s) and if DTFMT or DTFPH 
LABADDR=Name has been specified, IOCS branches to the user's label 
routine. If not, IOCS reads the tapemark that follows the last EOF 
label (see "Input File, Tapemarks"). 

If processing of an input file is terminated by a CLOSE or FEOV 
instruction before the end of the input data on the volume is reached; 
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the EQOF1 or EOVI1 labe 


l1 is not read and checked. IocS rewinds the tape 
as specified by DTF REWIND. 


User-Standard Labels CUHL/UTL) 


When user-sStandard labels CUHL/UTL) are to be checked and logical I0CS 
macros are used for the file,» DTF LABADDR=Name must be specified. If it 
is not specified, IOCS bypasses all user-standard labels. 


When physical IOCS macros are used for a file and DTFPH is specified, 
LABADDR=Name must be included if user-standard ‘header labels CUHL) are 
to be checked. IOCS does not provide for user checking of user-standard 
trailer labels (UTL). 


The input file (such as a card reader) that contains the user's 
information for checking user-standard labels must be opened ahead of 
the file with the UHL labels. This is done by specifying the 
label-information file ahead of the labeled file in the same OPEN 
instruction, or by issuing a separate OPEN instruction ahead. 


I0cCS identifies the user-standard labels by UHL or UTL in the first 
three bytes of the label. 


IOCS reads each user-standard label, one at a time, into a label area 
used by I0OCS for standard labels. I0CS supplies the address of this 
area in Register l. 


After a label is read in, IOCS branches to the user's label-checking 
routine. The same routine (specified by DTF LABADDR=Name) is used for 
checking both user~standard header (UHL) and user-standard trailer (CUTL) 
labels. The user can identify the type of label by the UHL or UTL in 
the first three positions of the label itself. 


After the user checks a label, he returns to IOCS by issuing a LBRET 
macro instruction. He controls the checking of any remaining 
user-standard labels by the operand in the LBRET instruction. A LBRET 2 
instruction permits the checking of another label. A LBRET 1 
instruction or a tapemark terminates label checking. 


If the user, or a tapemark, does not terminate the label checking, JIOCS 
reads in the next user-standard header label. 


Multivolume File 


When the volumes of a multivolume file are to be processed in sequence, 
starting with the first volume, no special instructions need be made by 
the user for the transition from one volume to the next. Logical I0CS 

recognizes the end-of-volume condition,and uses the existing CLOSE and 

OPEN routines to process, first the trailer labels, and then the header 
labels on the following volume. 


When an EOV1 label is read or an FEOV macro is executed, IOCS chec 
trailer labels as described in the sections “Input File, Epeate eee 
Label" and "Input File, User~-Standard Labels (CUHL/UTL).™ IOCS the 
prepares for checking the HDRlilabel on the next volume. [OCS ere 
by 1 the Volume Sequence Number in storage (read in from TLBL), and 
alsoupdates the active drive number if an ASSGN statement or command 
specified an alternative drive (ALT) for the file. 


After all trailer labels have been checked, IOCS switchesto the 
alternate tape drive, if one has been specified by ASSGN. If an 
alternate tape drive has not been specified, a message is given to the 
operator and the system enters the wait state. The operator must mount 
the new volume and restart processing. 


IOCS verifies that a VOLI label is present on each vo 
check the Volume Serial Number on any volume after th 
processed. 


The HDR1 label of each volume, after the first one pr 
against the TLBL information that has been updated by 
necessary (for example: Volume Sequence Number). 


lume, but does not 
e ir 


um 
first one 


is checked 


IOocS provides for user checking of user-~standard header labels on the 
new volume. 
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If physical IOCS macros are used for a file, an OPEN instruction must be 
issued for the new volume. This causes IOCS to check the HDR1 label and 
provide for user checking of user-standard labels, if any. 

If the user wants to start the processing of a multivolume file with 
some volume other than the first, he should supply TLBL information as 
follows: 

Field 4: File Serial Number should contain the volume serial number of 


the first volume of the set (not the volume being processed). 
Field 5: Volume Sequence Number should contain the sequence number of 
t ume th 


he vol at will be processed first in this run. 


Field 6: File Sequence Number should contain the sequence number of the 
file to be processed, if this is a multifile multivolume set. 


All other fields should contain the same information as when starting 
with the first volume of the set. 


This will properly check the HDR1 label. IOCS checking of the VOL1 label 
will detect the discrepancy in the volume serial numbers and issue a 
message to the operator. The operator can bypass this condition and 
continue processing. 


If a multivolume file 18S reopened after a CLOSE, IOCS expects that the 
volume available to OPEN is the same volume, on the same drive» as that 
in process when CLOSE was executed. If it iS not, a message iS isSSUed to 

Ss ceererews Also, the first record read on the reopen must be a file 
abel. 


When physical IOCS macros are used and DTFPH is specified for standard 
label processing, FEOV may not be issued for an input file. 


Multifile Volume 
TLBL must be submitted for each file to be processed. 


TOCS locates the first or only file that is to be opened by verifying 
the Volume Serial Number in the VOL1 label and then Searching the tape 
ver the HDR1 label that contains the File Sequence Number specified in 


If two or more files are to be opened, all files may be opened without 
rewinding the tape provided they are specified in ascending sequence. 
For any file after the first one opened, IOCS merely searches the tape 
for the file with the specified file sequence number. IOCS does not 
check the VOL1 label again. 


If the files to be opened are not specified in ascending sequence, the 
tape must be rewound before each file is opened. 


If the tape is positioned beyond a specified file when OPEN for that 
file is executed, a message is issued to the operator. The operator may 
remount or reposition the tape, or terminate the job. 


If the TLBL minimum specification (File Name only) is given for the 
file, either on input or when the file was originally written as an 
output file, the user must position the tape to read the desired file. 
For this, he can use the Job Control MTC FSF statement or command, and 
skip three tapemarks for each file to be bypassed. 


Read Backward 


iler label 


For a read backward f tra 
1 h HDR1) is read 


(EO0F1) is read and ec 
and checked by CLOSE. 


specified by DTF READ=BACK), the 
» and the header label ( 


The trailer label should contain both the header (except HDR) and 
trailer (Block Count) information. If the file labelS were originally 
written by IOCS with FILABL=STD specified, the trailer label will be 


complete. 


IOCS checks only the File Identifier field (field 3), i 
label, against information supplied by the user in TLBL 
not specified, no checking is performed. 


n th 
s I 
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The tape should be positioned so that the first record read, when OPEN 
is executed, is the tapemark immediately following the trailer labels. 
If the tape is not positioned this way, a message is issued to the 
operator and processing can be continued. The message will occur if the 
user begins reading backward in the middle of a file. 


Reading backward is confined to one volume, and an end-of-file condition 
exists when IOCS reads a tapemark. 


a for user-checking of user-Standard trailer and header 
abels. 


If physical IOCS macros are used by the problem program to read records 
backward, IOCS does not check labels. The DTFPH definition must be 
omitted and the user must provide his own checking, if any. 


Tapemarks 


The tapemark that follows the set of standard volume and header labels 
for a file indicates, to IOCS, that the last header label has been 
checked. The tape is positioned for user reading of the first data 
record. If files on other volumes are to be opened, IOCS opens the next 
ee ege ogc eee The header labels for that file are checked (Cor 

wri en). 


The tapemark that follows the data records indicates, to [IOCS, that the 
end of the input for the file or the volume has been reached. I0cs 

fe eo the EQF/EOV condition from the trailer label that follows the 
apemark. 


The tapemark that follows all trailer labels for a file or volume 
indicates to IOCS, that the last trailer label CEOF, EOV, or UTL) has 
been checked. If an EOF label has been read, IOCS branches to the 
user's end-of-file routine (specified by DTF EOFADDR=Name). If an EOV 
label has been read, IOCS provides for the processing of the next volume 
Cincluding label checking). 


STANDARD LABELS, OUTPUT FILE 


VOL1 Label 


A standard volume label (VOL1) should have been previously written as 
the first record on the volume, whenever standard file labels 
CFILABL=STD) are to be written. 


The VOL1 label can be written by the IBM-supplied utility program, 
Initialize Tape, when the reel of tape is first received in the 
installation. At that time, a permanent volume serial number is 
assigned and written on the reel as part of the volume label. This 
provides a permanent identification of the reel as long as it is used 
for files with standard labels. Following the VOL label, Initialize 
Tape writes a dummy HDR1 label and ao tapemark. Either EBCDIC or ASCII 
files can be initialized by this utility program. 


For a 9-track dual density output tape, a comparison is made between the 
user specified density and the VOLI1 density of the mounted tape. If a 
discrepancy is found, and if the tape is at load point, the volume 
label(€s) are rewritten according to the user-specified density. 


The volume on which an output file is written should be determined ahead 
of time if the user plans to include the File Serial Number field. This 
permits the volume serial number, already recorded in the VOL! label, to 


be specified in the File Serial Number field. 


Whenever the tape reel is positioned at the load point for writing the 
first or only volume of an output data file, IOCS reads and checks the 
VOL1 label against information supplied by the user. If an error is 
detected, a message its given to the operator. The operator may mount the 
correct volume, continue processing with the mounted volume, or 
terminate the job. 


If TLBL is used and the File Serial Number is not specified, IOCS 
fopar that the correct volume is mounted and does not check the VOL1 
a e e 
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If the output tape is positioned at the load point and IQOCS reads a 
record that is not a VOL1 label, a message is given to the operator. 
can cancel the job, mount a different tape reel, or key ina six-digi 
Volume Serial Number. In the latter case, [0CSwrites theVOL1 label a 
the beginning of the tape and processing continues. 


He 
t 
t 


Because JOQCS expects to read a record to check for a VOL1 label, the 
tape used for output must contain some type of record (a label, data 
record, or tapemark). If it does not, the entire reel of tape is passed 
through the tape unit. 


In a multivolume file, the VOL1 label of succeeding volumes after the 
first one written is mot checked (see "Output File, Multivolume File™). 


If any additional volume labels (VOL2—VOL8) follow a VOL1 label, [OCS 
bypasses them. Similarly, IOCS bypasses any user volume labels 
CUVL1—UVLI) on ASCII tape files. 


HDRI/HDR2 Labels 


If an output file is to be written on a tape reel that already contains 
standard file labels, IOCS first reads the old HDR1 label. It checks the 
expiration date to ensure that the data on the tape is no longer active. 


If the expiration date has passed, IOCS backspaces the tape and writes 
SN er eae label immediately after the VOL label(s) and over the old 
abel. 


If the expiration date has not passed,» a mesSage 1S given to the 
operator. The operator can ignore the expiration date and continue 
processing, mount a new volume, or terminate the job. 


If an output file is to be written on a tape that does not contain 
standard file labels, IOCS assumes that the expiration date has passed. 
IOCS writes the new HDR1 label immediately after the VOL label(s). 


If an output file is to be written on a multifile volume(s) with 
standard labels, only the expiration date of the first file to be 
overwritten is checked. IOCS assumes that all succeeding files have the 
Same expiration date. 


The HDR1 label is written from the information supplied by the user in 
TLBL», or generated by I0CS (see "Section: Label Fields for Tape") 


tees specifications are omitted, IOCS writes predetermined default 
values . 


In a multivolume file, the HDR1 label on each volume after the first one 
processed is written with the TLBL information that has been updated by 
IO0CS where necessary (see "Output File, Multivolume File”) 


In a multifile volume, the HDR1 label for each file after the first is 
written with information obtained partly from the preceding standard 
pee e lanes and partly from TLBL (Csee "Output File, Multifile 
olume™). 


For EBCDIC IOCS does not write additional header labels epee If 
the user wants to write any of these labels he can specify a labe 
routine (DTF LABADDR=Name) and use physical IOCS macros CEXCP and WAIT). 


For ASCII IOCS writes an additional header label (CHDR2) nhich contains 
the record format, block length, record length and buffer offset. 


If DTFMT or DTFPH LABADDR=Name is specified to indicate that 
user-standard header labels (UHL1I—UHL8 for EBCDIC; UHLa for ASCII) are 
to be written after the HDRlabels(s), IOCS branches to the user's label 
routine. If not, JOCS writes a tapemark and positions the tape for 
writing the first data record. 


EQFI/EOV1 and EOF2/EOV2 Labels 
When IOCS CLOSE is executed, after all records for a file have been 


processed, it writes the last block of data records (Cif any), a 
tapemark, and an EOF1 trailer label. 
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If IOCS detects the reflective marker at the end of the tape before the 
end of the output file is reached (see "Output File, Multivolume File"), 
or if an FEOQV macro is executed, IOCS writes a tapemark and an EOVI 
trailer label. 


The EOF1 or EOV1 trailer label is written with HDR1 information in all 
fields except Block Count. Block Count is written with count accumulated 
during processing of the data file. 


For EBCDIC I0CS does not write additional EOF or EQOV labels (CEQF2—EOF8 
or EQV2—EOV8) If the user wants to write any of these labels he can 
specify a label routine (DTF LABADDR=Name) and use physical IOCS macros 
CEXCP and WAIT). 


For ASCII IOCS writes an additional trailer label CEOV2/E0OF2) which 
contains the same information as the HDR2 label. 
If DTFMT or DTFPH LABADDR=Name is specified to 


indicate that 
user-~standard trailer labels CUTLI—UTL8 for EBCDIC; UTLa for ASCII) are 
to be written after the EOF/EOV trailer label(€s), IOCS branches to the 
user's label routine. If not, I0CS writes one or two tapemarks as 
determined by an end-of-volume or end-of-file condition (see "Output 
File, Tapemarks™). Logical IOCS then rewinds the tape as specified by 


DTF REWIND. 


User-Standard Labels (CUHL/UTL) 


When user-standard labels are to be written for an EBCDIC or ASCII file, 
DTFMT or DTFPH LABADDR=Name must be specified. 


Whenever LABADDR=Name is specified, at least one UHL label and one UTL 
label must be written. 


The input file (such as a card reader) that contains the user's 
information for writing user-standard labels must be opened ahead of the 
file on which the UHL labels are to be written. To do this, the input 
file must be specified ahead of the file to be labeled in the same OPEN 
instruction, or a separate OPEN instruction must be issued ahead. 


The user must build each user~-standard label. To provide for this, J0CS 

branches to the user's label routine. The same routine (specified by 
LABADDR=Name) is used for building both user-sStandard header labels 
(UHL) and user-standard trailer labels CUTL). IOCS supplies a code in 

DF Ton Order byte of Register 0 to indicate which type of label should 
ui : 


— Code O (letter DO) 
— Code F for end-of-file condition 
Code V for end-of-volume condition 


The user must establish an 80-byte area within his problem program area 
of main storage for building his labels. He must load the address of 
the area he uses into Register O before returning control to IOCS. 


When building the label for an EBCDIC file, the user must include UHL or 
UTL in the first 3 bytes and a digit 1-8 in the fourth byte. He may 
include whatever information he needs in the remaining 76 bytes. 


Note: When user header and trailer labels are created for 7-track 
;ope>? only unpacked data is valid in the 76-byte data portion of the 
abe 


files, a user standard header and 
respectively, in the first three 
ASCII character in the range 2/0 
e remaining 76 bytes may be used 


To comply with the standards for ASC 
trailer label must contain UHL and U 
bytes. Also, the fourth byte must be 
through 5/714, excluding 2/77 (quote). 
as desired. 


After building a label, the user returns to I0CS by iss 
instruction. IOCS moves the label to the standard label 
necessary, and then writes the label on the tape. 


=O ce 
x73 


uin 
I/O area, if 


ing of succeeding user-standard 
ction. If another label is to 
OCS again branches to the user's 
is last user label, he issues 
writes the last label. 


The user controls the building and wri 
labels by the operand in the LBRET in 
be written, operand 2 is specified an 
label routine. When the user has buil 
the LBRET macro with the operand 1. I 
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For EBCDIC files a maximum of 8 uSer-Standard header and 8 user-standard 
trailer labels may be written. After 8 labels, IOCS terminates the label 
writing, regardless of the LBRET macro instruction. For ASCII files; 
theoretically there is no limit to the number of user standard labels 
(UHLa and UTLa). There is a physical limit since the physical tape may 
be reached before all user labels are written. 


After the last user-standard header label C(UHL), IOCS writes one 
tapemark. After the last uSer-Standard trailer label (UTL), IOCS writes 
one or two tapemarks, as determined by an end-of-volume or end-of-file 
condition (€see "Output File, Tapemarks™). 


Multivolume File 


When a multivolume file is to be written, no special instructions need 
be made by the user for the transition from one volume to the next. 
Logical IOCS recognizes an end-of-volume condition and uses the existing 
CLOSE and OPEN routines to write, first the trailer label(s), and then 
the header label(s) on the following volume. 


ter IOCS detects the reflective marker at the end of tape, it 
ermines the EOF/EOV condition by the next I/0 instruction for this 

in the problem program. If the instruction is CLOSE, an end-of-file 
F) condition exists and IOCS writes a tapemark and an EOF1 label, 
lowed by an EOF2 label (for ASCII only). If, however, the next 
truction is a PUT, an end-of-volume CEOV) condition exists and IQCS 
ites a tapemark and an EOV1 label, followed by an EOV2 label (for 
word ee For an ASCII file, two tapemarks are written following the 

abel. 


When an EOV condition exists or an FEOV (forced end-of-volume) macro is 
executed, IOCS permits the writing of user-standard trailer labels, if 
any», and then prepares for writing the HDR1 label on the next volume. 
IOCS increases by 1 the Volume Sequence Number in storage (read in from 
TLBL), and updates the active drive number if an ASSGN statement or 
command specified an alternate drive (ALT) for the file. 


Af 
det 
file 
CEO 
fol 
Ins 
wr 
AS 
EO 


After all trailer labels have been written, IOCS writes one tapemark and 
Switches to the alternate tape drive, if one has been specified by 
ASSGN. If an alternate tape drive has not been specified, a message is 
given to the operator and the system enters the wait state. The operator 
must mount the new volume and restart processing. 


IOCS verifies that a VOL1 label iS present on each volume, but does not 
check the Volume Serial Number on any volume after the first. 


The HDR1 label of each volume after the first is written with the TLBL 
information that has been updated by IOCS where necessary (for example: 
Volume Sequence Number). 


On each volume, the File Serial Number field of the HDR1 label is 
written with the Volume Serial Number of the first volume of the set. 
Thus on each volume after the first, the File Serial Number in the HDR1 
label differs from the Volume Serial Number in the VOL1 label. 


ee provides for user writing of user-sStandard header labels on the new 
volume. 


If physical IOCS macros are used for the file, an OPEN instruction must 
be issued for a new volume. This causes IQCS to write the standard 
header label and provide for user writing of user-sStandard labels, if 
any. 

Multifile Volume 


TLBL must be submitted for each file to be written. 


When two or more files are to be written in the Same operation, the DTF 
entry REWIND=NORWD should be specified for each file. With this 
specification, the tape is located at the correct position for the OPEN 
routines to urate the standard file header label for each additional 


file (after the first) on the reel. 


To properly position the tape at the load point for the first file, t 
Programmer can include a CNTRL REW macro instruction ahead of the OPE 
instruction, or the operator can position the tape at the load point. 


zz 
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When the tape is at the load point for the first file, IOQCS OPEN ensures 
that the correct volume has been mounted by checking the Volume Serial 
Number in the VOL1 label against the information supplied by TLBL. If 
the File Serial Number is not specified, IOCS assumes that the correct 
volume 18S mounted. 


ee OPEN then checks the expiration date in the old HDR1 label Cif 
any 


TOCS writes the HDR1 label for the first out 
specifications supplied by the user in the T 
default values. 


the HDR1i label of each file after the first, the OPEN routines 
in the file serial number (Cfield 4), the volume sequence number 
ld 5), and the file sequence number (Cfield 6) from the preceding 
label. OPEN increases the file sequence number by 1 for the new 
The remaining fields of the header label are written with the 
ation supplied by the user in TLBL or as default values. 


put file from the 
LBL 


u 
B or supplied by IOQCS as 


rm 


er's responsibility to properly position the tape for writing any 
ditional file(s) at a later time. The tape must be positioned so that 
the file header label is written immediately after one tapemark 
following the last file currently on the tape. Thus, it must replace the 
second of the two tapemarks that normally follow the last file on the 
tape. 


he tape is rewound or repositioned after a file is closed, it is the 
j 


The tape can be advanced from the load point to the correct position by 
skipping three tapemarks for each file presently on the tape. A Job 
Control MTC FSF command or statement is used for this skipping and the 
DTF entry REWIND=NORWD must be included for the file. In this case, the 
VOL1 label is not checked, and the expiration date of the file to be 
overwritten Cif any) is checked. 


When the tape has been positioned and the file iS opened, the OPEN 
routines obtain the information for writing the HDR1 label from the 
preceding standard trailer label and from TLBL. This is the same as 
described previously for multiple files that are written without 


rewinding the tape. 


User-standard header and trailer labels may follow the standard header 
and trailer label for each file of a multifile volume. 


Tapemarks 


After all the header labels for a file are written, IOQCS writes one 
tapemark. The tapemark follows the HDR label(€s) if DTFMT or DTFPH 
LABADDR=Name is not specified for a file. If LABADDR i 


S specified, IQCS 
writes the tapemark when the problem program issues a LBRET 1 
instruction, which indicates that all the desired user-standard labels 
have been written, or when the maximum of eight UHL labels has been 
written. he tape is positioned for writing the first data record. If 
files on other volumes are to be opened, IOCS opens the next file 
specified and writes Cor checks) the header label(s) for that file. 


When the problem program issues either a CLOSE or FEOV macro 
instruction, or when IOCS detects the reflective marker at the end of 
the cobey IOcS writes a tapemark following the last block of data 
records. 


IO0CS writes two tap rks after an EOF] label, or after a set of EOF and 

UTL labels if LABAD Name 1s specified. 
tap 
BAD 


m 

R 

Ube es after an EOQV1 label, or afte of EOV and 
= i 


IocS writes one roaéset 
Name is specified. For ASCII files IOCS writes two 


UTL labels jf LA 
tapemarks. 


In a multifile volume, one tapemark follows the end-of-file label(s) 

each file except the last. Two tapemarks follow the end-of-file label 
of the last file. If a file is added later to a multifile volume, the 
second tapemark is replaced by the HDR1 label of the additional file. 
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NONSTANDARD LABELS 


The following discussion is concerned with nonstandard labels CDTFMT 
FILABL=NSTD). When nonstandard labels are specified, IQCS OPEN/CLOSE 
routines provide for user processing of nonstandard header labels at the 
beginning of the file, and nonstandard trailer labels at the end of the 
file. The functions performed by IOCS vary depending on input file vs 
output file and header label vs trailer label. 


A user routine is required to supply the information for 
checking/creating nonstandard labels. This routine, the functions 
performed by IOCS OPEN/CLOSE routines, and the specific processing 
performed for each type of label (within each type of file) are 
summarized in this section. 


Note: Nonstandard labels cannot be used on ASCII tape files. 


IOCS Routines 


IOocS OPEN and CLOSE routines provide for user processing of nonstandard 
labels. IOCS branches to the user's label routine if DIF LABADDR=Name is 
specified. 

The OQPEN/CLOSE routines are transient routines of the Supervisor. As 
such, they are stored on the system pack (SYSRES) and called into the 
transient area of main storage whenever an OPEN or CLOSE macro 


instruction is executed. 


User Routine 


The information for creating/checking nonstandard header and trailer 
labels is generally supplied by the user in a separate input file, such 
as a card reader. The information is stored by the user's problem 
program in a location that meets the requirements of hisS job. 


Nonstandard labels must be read and checked, or built and written, by a 
routine supplied by the user. The symbolic address of the user's label 
routine must be specified in the DTF entry LABADDR=Name. 


In his label routine, the user must issue physical IOCS macros 
instructions CEXCP and WAIT) to read or write the labels. He must set up 
a Command Control Block, by issuing a CCB macro instruction, and 
establish a CCW (Channel Command Word). 


The user must define his own label read-in or read-out area. 


In his label routine, the user performs whatever label reading and 
checking or building and writing he requires for his job 


At the end of his routine, the user returns to IOCS by issuing a LBRET 2 
instruction. 


NONSTANDARD LABELS» INPUT FILE 


Header Label 


If the input file was previously written using VSE (with FILABL=NSTD 
specified), the first record on the reel is the user's first nonstandard 
label. There is no volume label at the beginning of the reel. 


Nonstandard header labels may», or may not, be followed by a tapemark. 
This choices combined with the user's requirement to check the labels, 
or not; results in four possible conditions that can be encountered when 
an input file iS opened: 


e Label(s) followed by a tapemark are to be checked. 

° Label(s) not followed by a tapemark are to be checked. 

° Label(€s) followed by a tapemark are not to be checked. 

° Label(€s) not followed by a tapemark are not to be checked. 

For the first two conditions, DTF FILABL=NSTD and LABADDR=Name must be 
specified in the file definition. IOCS branches to the user's label 
routine when OPEN is executed. 
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For the third condition, DTF FILABL=NSTD must be specified. DTF LABADDR 
is omitted and IO0CS skips all labels, passes the tapemark, and positions 
the tape at the first data record to be read. 


For the fourth condition, DTF FILABL=NSTD and LABADDR=Name must be 
specified. IOCS branches to the user's label routine when OPEN is 
executed, and the user must read all labelS even though checking is not 
desired. This positions the tape at the first data record. This is 
necessary because IOCS cannot distinguish labels from data records and 
because there is no tapemark to indicate the end of the labels. If this 
were not done, IOCS would search the tape for a tapemark, and thus pass 
the wees file until it reached the tapemark that follows the last data 
record. 


When DTF LABADDR=Name is specified for checking labels, IOCS branches to 
the user's label routine only once. The problem program must perform all 
required reading and checking of header labels before returning to IOCS. 
The user can determine that the last label has been read by checking 
some identifying information he has provided in the last label, or by 
the tapemark, if any, that folllows the label(s). 


After all header labelsS have been processed and the user has returned 
control to IOCS OPEN (by use of the LBRET 2 macro instruction), IOCS 
reads and checks the next record. If it iS a tapemark, IOCS assumes that 
the following record is the first data record. If it is not a tapemark, 
IOCS backspaces the tape one record and assumes that this record is the 
first data record. Thus, the user should read all labels, before 
pent =< IOCS s0 that the tape iS properly positioned at the first 
ata record. 


If a file is reopened after a CLOSE, it is the user's responsibility to 
identify the first record read as a file label or a data record. 


End-of-File/End-of-Volume Label 


When DTF LABADDR=Name i8 specified for checking labels, IOCS branches to 
the user's label routine when it reads the tapemark that follows the 
last data record. 


IOCS branches to the usSer's routine only once. The problem program must 
read and check all trailer labels before returning to I0CS. 


From his trailer label, the user must determine if an end-of-file or an 
end-of-volume condition exists and indicate this to IOCS. For this he 
must load either EF (Cend-of-file) or EV Cend-of-volume) in the two 
low-order bytes of Register OO. 


After all trailer labels have been processed, the user returns control 
to I0CS by issuing a LBRET 2 macro instruction. 


If an EF condition was indicated, IOCS branches to the user's 
end-of-file address (specified by DTF EOFADDR) when the problem program 
returns to IOCS at the end of the label routine. The uSer can perform 
whatever processing is required for the end of his data records, and he 
generally closes the logical file. 


If processing of an input file iS terminated by a CLOSE, or an FEDOV 
(forced end-of-volume) instruction, before the tapemark at end of the 
ree data is reached, I0CS does not branch to the uSer's label checking 
routine. 


Multivolume File 


When the problem program reads an end-of-volume label and specifies an 
EV condition to IOCS, or issues a forced end-of-volume instruction 
(FEOV), IOCS prepares for processing records from the next volume. IOCS 
updates the active drive number if an ASSGN statement or command 
specifies an alternate drive (ALT) for the file. 


IOCS switches to the alternate drive, if one has been specified. If not, 
a message is given to the operator, and the system enters the wait 
state. The operator must mount the new volume and restart processing. 


IOCS provides for user checking of header labels on the next volume, if 
LABADDR=Name is specified for the file. 
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When an alternate drive is assigned to a file, the number of the drive 
currently in_use must be supplied to the Command Control Block (CCB). 
used by the EXCP macro for label reading. IOCS provides the hexadecimal 
value of this drive in the two low-order bytes of Register 1. The user's 
label routine should move this value to bytes 6 and 7 of the CCB. 


If physical IOQCS macros are used for a file, an OPEN instruction must be 
issued for a new volume. This causes IOCS to provide for user checking 
of nonstandard labels. 


If a multivolume file is reopened after a CLOSE, IOCS expects that the 
volume available to OPEN is the same volume, on the same drive, as that 
in process when CLOSE was executed. If it iS not, a message is issued to 
the operator. 


Multifile Volume 


If multiple files on the Same volume are to be read in sequence, the DTF 
entry REWIND=NORWD should be specified for each file. With this 
specification, the tape is located at the correct position for the user 
to read his first header label or data record when each file (after the 
first on the reel) is opened. 


To properly position the tape for the first file on the reel, the 
programmer can include a CNTRL REW macro instruction ahead of the OPEN 
instruction, or the operator can position the tape at the load point. 


When the first file to be opened is not the first file on the reel, the 
tape can be advanced from the load point to the correct position by use 
of the Job Control MTC FSF statement or command. Either two or three 
tapemarks are skipped for each file to be passed. If TPMARK=NO was 
specified when the files were written, two tapemarks are skipped. If 
not, three tapemarks are skipped. The DTF entry REWIND=NORWD must be 
included for the file to be opened. 


When any file is opened, IOCS branches to the user's label routine, if 
specified. The user can read and check header labels. 


Read Backward 


The tape should be positioned so that the first record read, when OPEN 
is executed, is the tapemark immediately following the trailer labels. 


When the file is opened, IOCS provides for user checking of the trailer 
label(s) in the same manner that header labelsS are checked on a forward 
read (see "Input File, Header Label"™). 


IGCS assumes that the end of the input file has been reached when it 
reads a tapemark at the beginning of the tape (between the header label 
and the first data record). 


IOCS CLOSE branches to the user's label routine (specified by DTF 
BADDR=Name) where he can read and check the ‘header label(s). 


LA 
If the tape does not contain a tapemark between the header label(€s) and 
the first data record CTPMARK=NO was specified when the tape was 
weeren ie user must determine whether a record is a file label or a 
ata record. 


Tapemarks 


IOCS does not expect a tapemark at the beginning of the volume. When 

is executed, IOCS branches immediately to the user's label routine 
ABADDR=Name is specified) so that the problem program can read and 
the first record. 


emark may,» or may not, follow the nonstandard labels depending on 
er TPMARK=NO was specified when the file was written. 


L 

k 

p 

h 

onstandard labels are not to be checked, IOCS can properly position 
tape for reading the first data record, only if a tapemark exists 
een the labels and the data records. If a tapemark is not present, 
user must read the labels in order to advance the tape to the proper 
tion for reading the first data record. Thus, in this case, DTF 
DDR=Name must be specified even though labels are not to be checked. 
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The tapemark that follows all data records indicates to IOCS that the 
end of input from the file or volume has been reached. 


NONSTANDARD LABELS, OUTPUT FILE 


Header Label 


n where the 
load point, 
t 1s already 


Nonstandard header labels are written starting at the lo 
tape 1s positioned. Thus if the tape has been rewound to 
the first nonstandard label is written over any label(s) 
on the tape, such as a volume label. 


Cc Oo 


ati 
the 
tha 


IOCS does not check for the presence of a volume label or the expiration 
of a previously written standard or nonstandard file label. 


Whenever DTF LABADDR=Name is specified, at least one header label must 
be written. 


The input file (such as a card reader) that contains the user's 
Information for writing nonstandard labels must be opened ahead of the 
file on which the header labels are to be written. To do this the input 
file must be specified ahead of the file to be labeled in the same OPEN 
instruction, or a separate OPEN instruction must be issued ahead. 


The same routine (specified by DTF LABADDR=Name) is used for building 

and writing both nonstandard header and nonstandard trailer labels. When 
IOCS branches to this routine at QPEN time, it supplies the letter O in 
eile om order byte of Register 0 to indicate that a header label should 
e wri en. 


ader labels. 


IOCS branches to the user's label routine only once f e : 
a he required 


Therefore, the problem program must build and write 
header labels before returning to [O0CS. 


Oo 
> 
+> 


After all header labels have been written, the user returns control to 
IOCS OPEN by use of the LBRET 2 macro instruction. 


IocS writes a tapemark after the last header label, unless the user has 
specified DTF TPMARK=NO. 


End-of-File/End-of-Volume Label 


When IOCS CLOSE is executed after all records for a file have been 
processed, it writes the last block of data records (Cif any) and a 
tapemark, and then branches to the user's label routine. 


If I0CS detects the reflective marker, at the end of the tape, before 
the end of the output file is reached (see "Output File, Multivolume 
File"), or if an FEOV macro is executed, [OCS writes a tapemark and 
branches to the user's label routine. 


IOCS indicates (to the user) which type of trailer label should be 
written, by supplying a code in the low order byte of Register 0; 


Code F ——- end-of-file label 
Code V — end-of-volume label 


The user should code his trailer label to indicate whether it is an 
end-of-file label or an end-of-volume label. This will be required by 
the user's label routine when the file is used later as input. 


IOCS branches to the user's label routine only once on an end-of-file or 
end-of-volume condition. The problem program must build and write all 
the required trailer labels before returning to IO0CS. 


After all the trailer labels are written, the user returns control to 
IOCS by use of the LBRET 2 macro instruction. 


IOCS writes one or two tapemarks as determined by an end-of-volume or 
end-of-file condition (see “Qutput File, Tapemarks™). 
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Multivolume File 


If IOCS detects the reflective marker at the end of the tape, it 
determines the end-of-file or end-of-volume condition by the next [/0— 
instruction for this file in the problem program. If the instruction 15 
a CLOSE, an end-of-file condition exists; however, if the next 
instruction is a PUT, an end~-of-volume condition exists. 


If the problem progam issues an FEOV (forced end-of-volume) macro 
instruction, an end-of-volume condition exists. 


On any end-of-volume condition, IOCS writes a tapemark and branches to 
the user's label routine Cif LABADDR=Name is specified), so that 
nonstandard trailer label(€s) can be written. 


After all trailer labels are written and the user has returned to [OCS 
by a LBRET 2 instruction, IOCS writes one tapemark and prepares for the 
next volume. IOCS updates the active drive number if an ASSGN statement 
or command specifies an alternate drive (ALT) for the file. 


IOCS switches to the alternate drive, if one has been specified. If not, 
a message is given to the operator and the system enters the wait state. 
The operator must mount the new volume and restart processsing. 


IOCS positions the new volume at the load point and branches again to 
the user's label routine, so that he can write the header label(s) on 
the new volume. 


When an alternate drive is assigned to a file, the number of the drive 
currently in use must be supplied to the Command Control Block (CCB) 
used by the EXCP macro for label reading. IOCS provides the hexadecimal 
value of this drive in the two low-order bytes of Register 1. The user's 
label routine should move this value to bytes 6 and 7 of the CCB. 


If physical IOCS macros are used for a files» an OPEN instruction must be 


issued for a new volume. This causes IOCS to provide for user writing of 
header labels. 


Multifile Volume 


Multiple files can be written on the same volume in the same operation 
without repositioning the tape, by specifying DTF REWIND=NORWD for eac 
file. With this specification the tape is properly located for the user 
to write his nonstandard label for each additional file (Cafter the 


first) on the reel. 


To properly position the tape at the load point for the first file on 
the reel, the programmer can include a CNTRL REW macro instruction ahead 
at spe aCe instruction, or the operator can position the tape at the 

oad point. 


When any file is opened, IOCS branches to the user's label routine where 
he can write his nonstandard header label(s). 


If the tape is rewound or repositioned after a file is closed, the user 
must properly position the tape to write any additional file(s) at a 
later time. The tape can be advanced from the load point to the correct 
position by skipping either two or three tapemarks for each file 
presently on the reel. If TPMARK=NO was specified for those files 
already written, two tapemarks are skipped. If not, three tapemarks are 
skipped. A Job Control MTC FSF statement or command is used for the 
skipping, and the DTF entry REWIND=NORWD must be included for the file. 


Tapemarks 

On an OPEN condition, when the tape is at the load point, IOCS 
immediately provides for user-writing of nonstandard header labels. IOCS 
does not write a tapemark ahead of the first header label. 


IOCS writes a tapemark after the last nonstandard header label, unless 
DTF TPMARK=NO is specified. 


On a CLOSE or end-of-volume condition, IOCS writes one tapemark after 
the last data record of the file or volume. 
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After the last trailer label is written for a file, IOCS writes two 
tapemarks. 


After the last trailer label is written for an end-of-volume condition, 
IOCS writes one tapemark. 


In a multifile volume, one tapemark follows the end-of-file label(s) of 


each file except the last. Two tapemarks follow the end-of-file label(s) 
of the last file. 


PROCESSING OF UNLABELED TAPE FILES 


The following discussion is concerned with unlabeled files (DTFMT 
FILABL=NO). Whenever the DTF entry FILABL=NO is specified, or the FILABL 
entry is omitted, IOCS assumes that a file does not contain labels, 
regardless of what is actually written on the tape. The functions 
performed by IOCS ahead of», and after, a file of data records consists 
merely of writing tapemarks and positioning the tape reel for reading or 
writing records. These functions are summarized in this section by type 


of file. 
) 


UNLABELED FILES, INPUT FILE 


First Record 


If the input file was previously written using VSE (with DTF FILABL=NO 
specified, or FILABL omitted}, the first record for the file is either a 
tapemark or data record. Tapemarks are not written at the beginning of 
an unlabeled ASCII tape. 


If a tapemark is present, IOCS assumes that the next record is the first 
data record of the logical file. 


If I0CS does not detect a tapemark when it reads the first record from 
ole tape, a backspaces the tape and assumes that the first record i5 a 
ata record. 


If the input file was previously written with labels, IOCS treats the 
label as a data record. 


An unlabeled file may be opened anywhere in the midst of the file. 
Regardless of whether the file is opened at the first data record or 
somewhere in the middle of the file, no message is given to the operator 
Cas it 18 with standard labels). 


Last Record 


TIOcS assumes that the e 
reads the tapemark that 
branches to the user's e 
EQFADDR=Name. 


of the input file has been reached when it 
llows the last data record. IOCS immediately 
-of-file routine, specified by DTF 


nd 
f 
n 


In his end-of-file routine, the user must determine if an end-of-file 
condition actually exists or if this is an end-of-~volume condition. 


On an end-of-file, the user performs whatever processing is required for 
the end of his data records, and he generally closes the logical file. 


Multivolume File 


1 


1on exists 7 ad 


If the user determines that an end-of-volume t ( 
by issuing an 


cond 
of an end-of-file)d, he must indicate this to IOCS 
macro instruction in his end-of-file routine. 


nste 
FEOV 


Whenever an FEOV macro is executed, IQCS prepares for the next volume by 
updating the active drive number if an ASSGN statement or command 
specifies an alternate drive (ALT) for the file. 


IOCS switches to the alternate tape drive if one has been specified. If 
not, a message is gtven to the operator and the system enters the wait 
state. The operator must mount the new volume and restart processing. 
IO0CS then positions the new volume at the first data record. 
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If a multivolume file is reopened after a CLOSE, IOCS expects that th 
volume is on the same drive as that in use when CLOSE was executed. I 
it i5 not,» a message 1S issued to the operator. 


e 
f 


Multifile Volume 


If multip 


le files on the same volume are to be read in sequence, the DTF 

entry REWIN 
ti 
is 


=NORWD should be specified for each file. With this 
a the tape is located at the correct position for the user 
r 


specific 
st record when each file (Cafter the first on the reel}? is 


a 
to read h 
opened, 


To properly position the tape for the first file on the reel, the 
programmer can include a CNIRL REK macro instruction ahead of the OPEN 
instruction, or the operator can position the tape at the load point. 


When the first file to be opened is not the first file on the reel, the 
tape can be advanced from tne load point to the correct position by use 
of the Job Control MTC FSF command or statement. One tapemark 15 
skipped for each file to be passed. If the reel contains a tapemark 
before the first file CTPMARK=NO was not specified when the file was 
written), that tapemark must also be skipped. The DTF entry 
REWIND=NORND must be included for the file to be opened. 


Read Backward 


An unlabeled tape file can be read backward if it has not been written 
in the data conversion mode (/7-track). 


Because of special error-recovery procedures, unlabeled ASCII tapes 
(without any leading tapemark) may be read backward. 


Tapemarks 


IOCS expects the first record for a file to be either a tapemark or a 
data record. In either case, IOCS positions the tape so that the user 
can read the first data record. I0CS treats a label Cif present) as a 


cata record. 
The tapemark that follows all data records indicates to IOCS that the 
end of itnpnut from a file or volume has been reached. 


UNLABELED FILES, OUTPUT FILE 


First Record 


IOCS writes a tapemark as the first record, unless the user specified 
DTF TPMARK=NO. 


The tapemark, or the first data record, is written starting at the 
tion where the tape is positioned. Thus if the tape has been rewound 


loca 

to the load point, the tapemark or data is written over any label(s} 
that is already on the tape, such as a volume label. 

aN tape is at load point, IOCS checks for the presence of a volume 
abe 


Last Record 


When IOCS CLOS 
processed, IOC 
tapemarks. 


If IOCS detects the reflective marker at the end of the tape before the 
end of the output file is reached (see "Output File, Multivolume File"), 
or if an FEOV macro is executed, I0CS writes one tapemark. 


cords for a file have been 


E i l1 re 
S w k of data records (Cif any) and two 


Multivolume File 


If [OCS detects the reflective marker before a CLOSE is executed, it 
determines the end-of-file or end-of-volume condition by the next I/O 
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struction for this file in the problem program. If the instruction is 
CLOSE, an end-of-file condition exists. If, however, the nex 
struction is a PUT, an end-of-volume condition exists. 


in 
a 
in 


If the problem program issues an FEOV (forced end-of-volume) macro 
Tnstruction, an end-of-volume condition exists. 


On any end-of-volume condition, IOCS writes one tapemark and prepares 
for the next volume. IOCS updates the active drive number if an ASSGN 
statement or command specifies an alternate drive CALT) for the file. 


IOCS switches to the alternate drive, if one has been specified. If not, 
a message is given to the operator and the system enters the wait state. 
The operator must mount the new volume and restart processing. 


IOCS positions the new tape at the load point and writes a tapemark, 
unless DTF TPMARK=NO has been specified. 


Multifile Volume 


Multiple files can be written on the same volume in the same operation 
without repositioning the tape, by specifying DTF REWIND=NORND for each 
file. With this specification, the tape iS properly located for the user 
to write the first record for each file (Cafter the first) on the reel. 


To properly position the tape at the load point for the first file on 
the reel, the programmer can include a CNTRL REW macro instruction ahead 
ot cine eee instruction, or the operator can position the tape at the 

oad point. 


If the tape is rewound or repositioned after a file is closed, the user 
must properly position the tape to write any additional file(s) at a 
later time. The tape can be advanced from the load point to the correct 
position by skipping one tapemark for each file presently on the reel. 
If the reel contains a tapemark before the first file (TPMARK=NO was not 
specified for those files already written), that tapemark must also be 
skipped. A Job Control MTC FSF statement or command is used for this 
skipping, and the DTF entry REWIND=NORWD must be included for the file. 


Tapemarks 


TOCS writes a tapemark ahead of the first data record, unless DTF 
specifies TPMARK=NO. 


IOCS writes two tapemarks after the last data record whenever the CLOSE 
macro is executed; if REWIND=NORWD is specified, the tape is then 
positioned between those two tapemarks. 


IOCS writes one tapemark after the last data record for a volume when an 
FEOV Cforced end-of-volume) macro is executed. 


AMERICAN NATIONAL STANDARD LABELS 


VSE processes tape files written in the American National Standard Code 
for Information Interchange CASCII),», in addition to processing tape 
files written in EBCDIC. ASCII is based on the specifications of the 
American National Standards [Institute, Inc. and standard labels for 


ASCII files are referred to as American National Standard standard 
labels. ASCII files may be unlabeled or labeled with American National 
Standard standard or user-standard labels. Nonstandard labels are not 
permitted on ASCII files. 


This section briefly summarizes the differences in specifications and 
processing of ASCII and EBCDIC standard labeled files. The American 
National Standard standard volume label and standard file 1 label are 
shown tn Figure 36 on page 160 and Figure 40 on page 167, respectively. 
The fields are described in Figure 37 on page 160 and Figure 41 on 

page 167 respectively. 


The differences between the American National Standard standard volume 
label and the IBM standard volume label fields are as follows: 
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Field EBCDIC Name ASCII Name Bytes 

No. EBCDIC ASCII 
4 Volume Security Accessibility 11 11 

5 Data File Directory (Reserved) 12-21 12-31 
6 (Reserved) (Reserved) 22-31 32-37 
7 (Reserved) Owner ID 32-41 38-51 
8 Owner ID (Reserved) 42-51 52-79 
9 (Reserved) Label Standard Level 52-80 80 


Some fields in the American National Standard standard file 1 label have 
names different from the corresponding fields in the IBM standard file 
label. These differences are as follows: 


posse EBCDIC Name ASCII Name Bytes 
Oo. 

4 File Serial No. Set Identifier 

5 Volume Sequence No. File Section Number 

11 File Security Accessibility 


The optional standard volume labels VOL2—VOL8 are supported for EBCDIC 
files only. ASCII has the optional user volume labels (UVL1—UVL9) 
instead. VSE ignores these labels on input and does not create them on 


output. 
and EOV labels 


files may have up to seven additional HDR, EOF, 
CHDR2-HDR8, EOF2-EOF8, EOQV2-E0V8), whereas ASCII may have up to eight of 
each of these labels CHDR2-HDRY, EDF2-EOF9, EOV2-EOVI). By VSE, these 
additional labelsS are bypassed on input and not created on output, 
except the HDR2, EOF2, EOV2 labels which were created for ASCII output 
files. The user-Standard header and trailer labels for each mode are: 
EBCDIC -- UHL1-UHL8 and UTL1-UTL8. 
ASCII -- UHLa and UTLa», where ‘a’* represents an ASCII character in 
the range 2/0 through 5/14, excluding 2/7 (quote). 
The default for the version number in the American National Standard 
ea ee NN da is 00; the IBM standard file label version number 
efaults to ; 


EOV labels on an EBCDIC tape file are followed by one tapemark; on an 
ASCII tape file these labels are followed by two tapemarks. 


When an ASCII file is processed, IOCS translates the labels from ASCII 
into EBCDIC Con input) and from EBCDIC into ASCII Con output). Two 
translate tables are provided in the SVA for this purpose. The address 
of the ASCII-to-EBCDIC table is in the extension of each communication 
region in bytes 44-47. The address of the EBCDIC-to-ASCII table is 256 
bytes higher than the address of the first table. The address of the 
communication region extension is found in bytes 136 - 139 of the 
communication region. 


Tapes to be used for ASCII files may be initialized with American 


National Standard standard labels by the IBM-sSupplied program, 
Initialize Tape. 
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LABEL FEIEtDS FOR TAPE 
Each label is illustrated, and each field of each label is described in 
detail. The individual fields in the illustrations are numbered D1-D to 
relate to the corresponding descriptions. 
The descriptions of the label fields include the: 


° Displacement in hex notation. 


e Field Number ~- Kn or Dn 


e Length of the field in bytes (hex notation). 


e Content of each field, together with the name of the field. 
An additional table shows for each field: 


e Source of Information for checking or writing this field. 


° Purpose of the field. 


° Processing performed on input/output. 


° TLBL Default The TLBL statement has only one required field, the 
"name field’. All other fields are optional, and need be entered 
only if desired by the user. If any one of these fields is left 
blank for OUTPUT files, IOCS writes a certain default value in the 
corresponding output label field. If any one of these optional 
fields is left blank for INPUT files, no default value ts assumed 
and no checking of the corresponding label field is performed. 


Volume Labels on Tape 
Figure 346 and Figure 36 aon page 160 show volume labels for EBCDIC and 
ASCII tapes. 


Displ. Field Length Content 


Label ID: VOL 
Ignored by VSE 


Volume serial number 
Ignored by VSE 

Reserved 

Volume owner name or code 
Reserved 


Figure 34. Tape Volume Label for EBCDIC Code 
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7) Aa AN Nea 


Figure 35 


Source of Information : System 


Purpose: 
Identifies the standard volume label. 


Processing: 

On both input and output, IOCS checks this field to 
volume label is present on the tape when DTF FILABL 
specified for the first or only file on a tape reel ( 
volume label should be written previously, before a 1 
records is written on the tape. 


Source of Information System 


Purpose: 

Indicates the sequence of this label within the volume label (VOL) group. VSE 
supports Volume Label 1 only, but provision is made for additional standard 
volume labels if required in other systems. 


Processing: ; 
This field is processed in conjunction with the label identifier (field 1) to 
completely identify the volume label. 


Source of Information TLBL/System 


Purpose: 

Provides a unique identification for a reel (volume). The number 15s generally 
assigned when the reel is first received in the installation, and retained as 
long as the reel is used for files with standard labels. This number should 
also be used as the File Serial Number in the file HD label of each logical 
file written on the volume. This provides a unique i ntification of the 
volume/file relationship. If a multivolume logical file is written, the 
Volume Serial Number of the first volume becomes the lume Serjial Number in 
the file HDR1 label on all volumes. 


R1 
de 
il 
Vo 


input and output, [OCS checks this field 
in the File Serial Number field of TL 

is used and no operand is specified, IQCS 

y 


against the number supplied 
BL> for a singlevolume file. 
as 
mu 


sSumes the correct volume 
is mounted and does not check this field. For a ltivolume file, IOCS checks 
the Volume Serial Number of the first volume onl On succeeding volumes, the 
Volume Serial Number and the File Serial Number differ (as described in 
Purpose). On output if the tape does not contain a volume label, the operator 
may key in a 6-digit Volume Serial Number and IOCS then writes the volume 
label. In the TLBL control card; the Volume Serial Number may be between 
quotes, or without quotes. If between quotes, the Volume Serial Number is 
assumed alphabetic and the field in the label is assumed to contain trailing 
blanks. If without quotes, the Volume Serial Number is assumed numeric and the 
field in the label is assumed to contain leading zeros. 


Source of Information 


Purpose: 

Provides a code to indicate that additional identification is required before 
a volume can be considered the correct one for processing. VSE does not use 
this fteld, but provision is made for additional security in other systems. 
For example, OS/VS allows operator response of a predetermined ‘password’ to 
further authorize a volume for processing. 


Processing: 
On both input and output, IOCS ignores this field. 


Note: 

security protected. 

an EBCDIC VOL1 label (Tape or DASD), 
volume to be accesssed by ONLINE TE 
National Standard Label, DBOS/OLTSEP 


0 
STS is an American 
i i to be accessed 
if the security byte is other than X'‘'2 


T 
W 
’ 


(Part 1 of 2). Tape Standard Volume Label 1 Fields 
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Source of Information 


Purpose: 
Used for Direct Access volumes only. Should contain blanks on tape volumes. 


Source of Information 


Purpose: 
Reserved for future use. Should contain blanks. 


Source of Information 

Purpose: 

Reserved for future use as required for American National Standard Institute, 
Inc. Should contain blanks. 

Source of Information 

Purpose: 

Reserved for the identification of the owner or assignee to whom this volume 
belongs, such as a customer, installation, department, or system. This can be 
a value for controlling the allocation of tape reels ina large installation. 


Processing: 
On both input and output, I0OCS ignores this field. 


Source of Information 


Purpose: 
Reserved for future use. Should contain blanks. 


(Part 2 of 2). Tape Standard Volume Label 1 Fields 


Displ. Field Length Content 


Figure 36. 


Label ID: VOL 

Ignored by VSE 

Volume serial number 
Accessibility 

Reserved 

Name or code of volume owner 


Reserved 

Standard byte: ile has ANSI standards 
bl ile does not have ANSI 

tandard 


BUN 
o 
a 


D 
D 
D 
D 
D5 
D 
D 
D 


wo~i- 


f 
f 
S 


Tape Volume Label for ASCII Code 
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Source of Information : System 


Purpose: 
Identifies the standard volume label. 


Processing: 

On both input _ and output, IO0CS checks this field to verify that_a standard 
volume label is present on the tape when DTF FILABL = STD, or DTFPH, is 
specified for the first or only file on a tape reel (at the load point). The 
volume label should be written before a logical file of data records is 
written on the tape. 


Source of Information : System 


Purpose: 
Must be 1. Any other VOL labels will be ignored. 


Processing: 
This field is processed in conjunction with label identifier (field 1) to 
identify the volume label completely. 


7 

D3 | Source of Information TLBL 
Purpose: 
Provides a unique identification for a tape reel (volume). The number i 
generally assigned when the reel is first received in the installation, 
retained as long as the reel is used for files with standard labels. This 
number should also be used as the File Serial Number in the file HDR1 label of 
each logical file written on the volume. This provides a unique 
identification of the volume/file relationship. If a multivolume logical file 
is written, the Volume Serial Number of the first becomes the File Serial 

a 


Number of the file HDR1 label on all volumes. 


Processing: 

On both input and output, IOCS checks this field against the number supplied 
by the user in the File Serial Number field of TLBL, for a single-volume file. 
If TLBL is used and no operand is specified, [OCS assumes the correct volume 
is mounted and does not check this field. For a multivolume file, IOCS checks 
the Volume Serial Number of the first volume only. On succeeding volumes, the 


Volume Serial Number and the File Serial Number differ (as described in 
Purpose). On output if the tape does not contain a volume label, the operator 

rast ad in a 6-digit Volume Serial Number and IOCS then writes the volume 
abel. 


Source of Information 


Purpose: 
Provides a code to indicate that additional identification is required before 
a volume can be considered the correct one for processing. 


Processing: 
On input, if this field is not x'4&0* IOCS calls phase S$IJJTSEC for further 
checking (see Macro User's Guide). On output, IOCS writes space a space. 


Source of Information 

Purpose: 

Reserved for future use as required for American National Standards Institute, 
Inc. Should contain spaces. 

Source of Information 

Purpose: 


Reserved for future use as required for American National Standards Institute, 
Inc. Should contain spaces. 


Figure 37 (Part 1 of 2). paet ae eee Volume Label 1 CASCII Mode) 
ields 
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Source of Information : - 


Purpose: 

Provides for the identification of the owner or assignee to whom this volume 
belongs, such as a customer, installation, department, or system. This can be 
a value for controlling the allocation of tape reels ina large installation. 


Processing: 
On both input and output, IOCS ignores this field. 


Source of Information 
Purpose: 
Reserved for future use as required for American National Standards Institute, 
Inc. Should contain spaces. 
7 Source of Information 


Purpose: 


Lis This file observes the American National Standard Institute, Inc. 
Standards. 
(Decimal 1) 
This file does not necessarily observe the American National Standards 
poet eae Inc. standards but it follows an agreed format. 
pace 


Figure 37 (Part 2 of 2). pegs eae Volume Label 1 CASCII Mode) 
lelds 


The volume label for tapes is 80 bytes long and begins by ar gee the 
first volume label. Additional volume labels are ignored by 
IBM-Standard File Labels on Tape 


[laure 38 and Figure 40 on page 167 show IBM-sStandard file labels for 
apes. 


lA 


Displ. Field Length Content 


D1 Label ID: HDR, EOF, or EOV 

2 Label sequence number: 1 

File-ID from TLBL 

Volume serial number of the volume where 

the file begins 

Volume sequence number within the file 

File sequence number on the volume 

Version number of the file 

Sub-version number 

Creation date: cyyddd 

c indicates the century, blank=19, Q=20, 1=21 
Expiration date: cyyddd 

Ignored by VSE 

Number of blocks pecs" in trailer labels only 
System code: IBM VS 

Reserved 


Reems OOOWO UOO 
Ww 


DUNE O OONAin pp 
NOOR AN DPD Wer w 


0 
3 
by 
15 
1B 
1F 
23 
27 
29 
2F 
35 
36 
3C 
49 


OOoU00 


Figure 38. IBM-Standard Tape File Label for EBCDIC Code 
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7 
i 
eB 
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TLBL Default (Qutput) : - 
Source of Information System 


Purpose: 

Identifies the type of standard file label. HDR signifies a standard header 
label at the beginning of a logical data file, and _ EOF signifies a standard 
trailer label at the end of a logical data file. EQV is a standard trailer 
label that signifies the end of records on one reel of tape, with additional 
records on one reel of tape, with additional records for the same logical file 
on another reel Cvolume). 


Processing: 

On input, IOCS OPEN/CLOSE r ines search for HDR to locate the beginning of a 
file, and check EOF/EQv to rmine the end-of file vs end-of~volume 
condition. On output, IOCS N/CLOSE writes the appropiate identification. 
The user never specifies thi identification. 


TLBL Default (Qutput) 
Source of Information 


Purpose: 

Indicates the sequence of this label within a label group 
supports File Label 1 only, but provision iS made for a di 
labels in other systems. For example, OS/VS uses both HD 
HDR2, EOF2, EQVe standard file labels. 


This field is processed in conjunction with the label identifier (field 1) to 
completely identify the type of standard label. 

TLBL Default (Qutput) DTF Filename 

Source of Information TLBL 

Purpose: 


Permits the user to identify his logical file by an application-oriented 
unique name. 


S OPEN/CLOSE check against, or write, the name specified by th 
not use this field to select the proper file for processing. 
aa and no operand is specified for an output file, IOCS writes 
ilename. 


TLBL Default (Output) Volume Serial Number of tist file 
Source of Information TLBL 


Purpose: 

Provides a numeric (Cor code) identification for the logical file. In a 
multivolume file, this field contains the same number in the header label on 
each volume. This field should contain the Volume Serial Number from the VOL 
label of the first or only volume of the file. If it does, this uniquely 
identifies the volume/file relationship. If it does not, an error message is 


issued to the operator when the volume label is checked (see Figure 35 on 
page 158, field 3). 


Processing: 

On input, IOCS OPEN/CLOSE uses this field in conjunction with label fields 5 
and 6 to identify the file specified for process. Ag The file is specified» 
by the user by these same three fields in TLB 

On output, [OCS OPEN/CLOSE write the file rear number specified by the user. 
If TLBL is used and no operand is specified for an output file, IOCS writes 
the volume serial number of the first Cor only?) reel of the file. 


Figure 39 (Part 1 of 4). Tape Standard File Label 1 Fields 
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TLBL Default (Output) oocol 
Source of Information ;: TLBL/System 


Purpose: 
Identifies the order of the columns of data records in a multivolume logical 
file or in a multivolume multifile set. In a logical file the Volume Sequence 
Number should be 0001. 


Processing: 
In a_multivolume file or ina multivolume multifile set, the user need specify 
Cin TLBL) only the number of the first volume to be processed. I0CS increases 
this number by 1 for each succeeding volume after the first. On input, I0CS 
uses this label field,» in conjunction with fields 4 and 6, to identify the 
file and volume specified (by TLBL). On output, IOCS writes the volume 
sequence number as specified by the user or updated by [IOCS. If TLBL is used 
and no operand is specified for an output file, IOCS writes 0001. 


TLBL Default (Output) 0001 
Source of Information : TLBL/System 


Purpose: 


Identifies the order of the logical files on a multifile volume or in a 
shat pias tara volume set. In a single-file volume, the File Sequence Number 
shou e 


Processing 
On input, i0cS OPEN uses this field in conjunction with label fields 4% and 5 
to identify the file specified for processing. The file is specified, by the 
user, by these same three fields in TLBL. On output, when a multifile 
volume(s) is to be written starting at the load poi Sh user need specify 
0 
0 


the File Sequence Number of the first file only. L is used and no 
operand is specified for the output file, IOCS wri Ol. IOCS increases 
the number by 1 for each succeeding file. IocS OP SE writes the 
appropiate number, as specified or updated. 


TLBL Default (Output) 


Source of Information 


n 
f 
e 
N 


TLBL 


Purpose: 
Identifies the various editions of a file, such as a grandfather-father-son 
relationship. Thus it can be used to ensure that the desired edition of the 
file is selected for processing, if several editions are maintained in the 
library for history reference. The editions should be numbered in sequence. 


Processing: 
IOCS checks against, or writes, the number supplied by the user. If TLBLis 
used and no operand is specified for an output file, IOCS writes blanks. 


blanks 
TLBL 


TLBL Default (Output) 


Source of Information 


Purpose: 


Provides a more detailed identification of the editions of a file. For 
example, field 7 could specify a month (1-12), and this field could specify 
the activity for a particular week (1-5) of the month. 


Processing: 
IGCS checks against, or writes, the number supplied by the user. If TLBL is 
used and no operand is specified for an output file, IOCS writes blanks. 


Figure 39 (Part 2 of 4). Tape Standard File Label 1 Fields 
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TLBL Default (Output) 


Source of Information TLBL for Input 
System for Output 


Purpose: 

Provides the date that the file was originally created. This can be used at a 
later time to determine how old the records are. Or, it can be used Cin 
conjunction with or in place of generation number) to ensure that the desired 
edition of the file is selected for processing. 


Processing: 

On input, IOCS OPEN checks this date against the data supplied by the user. 
If TLBL is used, the data is supplied in ‘the Date field. If it is omitted, 
the creation date in the label is not checked. The format of the date to be 
entered in TLBL is yy/ddd (year/day of the year). The day may have 1-3 
characters. On output, IOCS writes the date that is available in the 
communication region of the Supervisor. The user does not supply a creation 
date for an output file. 


TLBL Default (Output) Creation Date 
Source of Information TLBL or SYSTEM for OUTPUT 


Purpose: 

Indicates the date that the records may be considered inactive. At that time 
the old file may be deleted by overwriting it with a current edition of the 
Same logical data, or another file 


Processing: 

If TLBL is used, this field is not checked on input. On output, IOCS OPEN 
compares this field in the old header label to today’s date in the 
communication region to determine if the old label has expired. If so, [OCS 
overwrites the old label and data records. If not,» a message is given to the 
operator, who then determines whether to to overwrite the old data. Ina 
multifile volume(s) processed sequentially, IOCS checks the expiration date in 
the old header of only the first file processed. All succeeding files are 
considered to have expired on the same date. IOCS OPEN/CLOSE writes the 
expiration date supplied by the user for the new output file. If TLBL is 
used, the Date field can specify either the date that the file will expire, or 
a retention period for the file. If the expiration date is specified, the 
format_is yy/ddd (Cyear/day of the year). You may enter 1-3 characters for 
ddd. The retention period is specified as 0-9999. If this field is omitted, 
a O-day retention period is assumed, and IOCS writes the date avaible in the 
communication region. 


TLBL Default (Output) - 
Source of Information System for Output 


Purpose: 

Provides a code to indicate that additional identification is required before 
a file can be considered the correct one for processing. VSE does not use 
this field, but provision is made for additional protection in other systems. 
For exampl : OS allows operator response of a predetermined "password' to 
futher au rize a file for processing. 


Processin 
On input 
supplied 


t 
ng 
I 
b 


CS ignores this field. On output IOCS OPEN/CLOSE writes the code 
the user. If none is specified, IOCS writes a character zero. 


Figure 39 (Part 3 of 4). Tape Standard File Label 1 Fields 
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TLBL Default (Output) = 
Source of Information System for Output 
Purpose 
Provides the number of physical records (blocks) written ina file when it was 
created This can be used (as a Thash' total) to verify that all records have 
been read, when the file is processed later as an input file. The number of 
records is the total of all physical records between the header and trailer 
labels of a logical file, excluding tapemarks and checkpoint records. This 
field is used in trailer labels only. In header labels it contains character 
zeros. 
Processing: 
For a read forw input file, IOCS OPEN sets a counter at zero. During 
processing, IOC outines accumulate a count of the blocks read from the tape. 
At the end of t file or volume, IOCS checks the accumulated count against 
that in the blo count field of the trailer label. If an input file is read 
backwards, IOCS stores the block count read from the trailer label on OPEN, 
and decrements e count during processing. At the end of the file (Cheader 
label), YOCS CLOSE checks the decremented count against the zero in the block 
count field of aS header label. A read backwards file must be contained 
Within one volu ‘ If the accumulated block count does not agree with the 
given to the operator who may ignore the error or terminate the job. On 
output, IOCS OPEN writes character zeros in this field of the header label. 
the trailer label at the end of the file or volume. In a multivolume file 
each EOV/EOF trailer label contains the number of blocks written on that 


count in the trailer label Cor header label on read backwards), a message is 
During processing, IOCS routines accumulate the block count and write it in 
volume only. 


TLBL Default (Qutput) = 


Source of Information : System for Output 


Purpose: 

Provides a code to indicate the IBM Programming System under which this file 
is written. This can be of value when an installation uses more than one 
programming system. 


Processing 

ae input focs ignores this field. On outp 
plied by the user. If none is supplied 

IBMDOSVSbbbbb in this field. 


TLBL Default (Output) 


ut I0CS ee eck the code 


t E 
by the user, I0CS 


Source of Information 


Purpose: 


This field is reserved for future use as required for American National 
Standards Institute, Inc. 


Processing: 
On input IOCS ignores this field. On output, IOCS writes blanks. 
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Displ. Field Length Content 


0 D1 3 Label ID: HDR, EOF, or EDV 
3 D2 1 Label sequence number: 1 
4 D3 1 File-ID from TLBL ; ; 
15 D4 6 Volume serial number of f the fil 
1B D5 4 Volume sequence number wi 1 i 
1F D6 4 File sequence number wit 
23 D7 4 Version number of the fi 
27 D8 2 Sub-version number 
29 D9 6 Creation date: cyyddd 
c indicates the century, X'S40'=19, X'"FO'=20, 
X*FLl’=21 
2F D10 6 Expiration : yyddd 
35 Dill 1 Accessibili ; 
36 Di2 6 Number of b ritten; only in trailer label 
3C D13 D System code B followed by two blanks 
49 D114 7 Reserved 


Figure 40. IBM-Standard Tape File Label for ASCII Code 


TLBL Default (Output) : = 


Source of Information System 


Purpose: 
Identifies the type of standard file label. HDR signifies a standard header 
label at the beginning of the logical data file, and EOF signifies a standard 
trailer label at the end of a logical data file. EOVis a standard trailer 
label that signifies the end of a record on one reel of tape, with additional 
records for the same logical file on another tape reel (volume). 


Processing: 


On input, IOCS OPEN/CLOSE routines search for HDR to locate the beginning of a 
file, and check EOF/EOV to determine the end-of-file versus end-of-volume 
condition. On output, IOCS OPEN/CLOSE writes the appropiate identification. 
The user never specifies this ide ifica 


TLBL Default (Output) 


D2 


Source of Information 


Purpose: 
Indicates the sequence of this label wi 
VSE supports File Label 1 and 2 for ASC 


thin a label group (HDR, EOF, EOQV). 
II, and ignores subsequent numbers. 


Processing: 
This field is processed in conjunction with the label identifier (field 1) to 
identify the type of standard label completely. 
TLBL Default (Output) DTF Filename 


TLBL 


Source of Information 


Purpose: 
Permits the user to identify his logical file by a unique, 
application-oriented name. 


Processing: 
IOCS OPEN/CLOSE check against, or write, the name specified by the 
do not use this field to select the proper file for processing. If 
uace and no operand is specified for an output file, IOCS writes th 

ilename. 


Figure 41 (Part 1 of 5). toe aneers File Label 1 CASCII Mode) 
ields 
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Pena] 


D6 


TLBL Default COutput) : Volume Serial Number of lst file 
Source of Information : TLBL 


Purpose: 

Provides a numeric (Cor cod dentification for the logical file. Ina 
multivolume file, this fie ontains the same number in the header label on 
each volume. This field s d contain the Volume Serial Number from the 
first file (Cor only file). it does, this uniquely identifies the 
volume/file relationship. it does not, an error message is issued to the 
oer ee when the volume la is checked (see Figure 37 on page 160, field 


Processing: 

On input, IOCS OPEN uses this field in conjunction with fields 5 and 6 
identify the file specified for_processing. The file iS specified, by 
user, by these three fields in TLBL. On output, IOCS OPEN/CLOSE write 
set identifier specified by the user. If TLBL is used and no operand i 
specified for an output file IGCS writes the volume serial number of 
first Cor only) reel of the 


9 

file. 

TLBL Default (Output) : 0001 

Source of Information TLBL/System 


Purpose: 
Identifies the order of the 
file or in a multivolume mu 


olume of data records in a multivolume logical 
ltifile set. In a singlevolume file, the File 
Section Number should be OO0O1. 


v 
t 
1 


Processing: 

In a_multivolume file or in a multivolume multifile set, the user need specify 
Cin TLBL) only the number of the first volume to be processed. IOCS increases 
this number by 1 for each succeeding volume after the first. On input, [OCS 
uses this label field, in conjunction with fields 4% and 6, to identify the 
file and volume specified (by TLBL). On output, IOCS writes the volume 
sequence number as specified by the user or updated by I0CS. If TLBL is used 
and no operand is specified for an output file, IOCS writes 0001. 


TLBL Default COutput) $ 000i 
Source of Information TLBL/System 
ie 
le 
should be 


s the order of the logical files on a multifile volume or ina 

oea oe ore set. In a singlefile volume, the File Sequence Number 
Processing: 

On input, IOCS OPEN uses this field in conjunction with label fields 4% and 5 
to identify the file specified for processing. The file is specified, by the 
user, by these same three fields in TLBL. On output when a multifile 
volume(€s) is to be written starting at the load point, the user must specify 
the File Sequence Number of the first file. If TLBL_ iS used and no operand is 
specified for the output file, IOCS writes O001. I0CS increases the number by 
1 for each succeeding file. IOCS OPEN/CLOSE writes the appropiate number, as 
specified or updated. 


Figure 41 (Part 2 of 5). pope. svandare File Label 1 CASCII Mode) 
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TLBL Default (Output) blanks 
Source of Information TLBL 


Purpose: 

Identifies the various editions of a file, such as a grandfather-father-son 
relationship. Thus it can be used to ensure that the desired edition of the 
file is selected for processing, if several editions are maintained in the 
library for history reference. This edition should be numbered in sequence. 


Processing: 
IOCS checks against, or writes, the number supplied by the user. If TLBL is 
used and no operand is specified for an output file, IOCS writes blanks. 


TLBL Default (Output) blanks 
Source of Information TLBL 
Purpose: 

Provides detailed identificati 


on 
example, i could specify the mont 
the activi a particular week (1-5 


pe ditions of a file. For 


: and this field could specify 
's) 


Processing: 
IGCS chechs against,» or writes, the number supplied by the user. If TLBL is 
used and no operand is specified for an output file, IOGCS writes blanks. 


TLBL Default (Output) 


Source of Information TLBL for Input 
System for Output 


Purpose: 

Provides the date that the file was originally created. This can be used at a 
later time to determine how old the records are. Or, it can be used Cin 
conjunction with or in place of generation number) to ensure that the desired 
edition of the file is selected for processing. 


Processing: 

On input, IOCS OPEN checks this date against the date supplied by the uSer. 
If TLBL is used, the date is supplied in the Date field. If it is omitted, 
the creation date in the label is not checked. The format of the date to be 
entered in TLBL is yy/ddd (year/ day of the year). The day may have 1-3 
characters. On output, IOCS writes the date that is available in the 
communication region of the Supervisor. The user does not supply a creation 
date for an output file. 


Figure 41 (Part 3 of 5). eae es File Label 1 CASCII Mode) 
ields 
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TLBL Default (Output) : Creation Date 

Source of Information : SYSTEM or TLBL for Output 

Purpose: 

Indicates the date that the records may be considered inactive. At that time 
the old file may be deleted by overwriting it with a current edition of the 
same logical data, or another file. 


Processing: 


If TLBL is used, this field is not checked on input. On output, I0CS OPEN 
compares this field in the old header label to today’s date in the 
communication region to determine whether the old has expired. If so, I0CS 
overwrites the old label and data records with the new label and data records. 
If not, a message is given to the operator, who then determines whether to 
overwrite the old data. In a multifile volume(€s) processed sequentially, IOQCS 


checks the expiration date in the old header of only the first file processed. 
All succeeding files are considered to have expired on the same date. Iocs 
OPEN/CLOSE writes the expiration date supplied by the user for the new output 
file. If TLBL iS used, the Date field can specify either the date that the 
file will expire, or a retention period for the file. If the expiration date 
is specified, the format is yy/ddd (Cyear/day of the yea ‘ The day may have 
1-3 characters. If a retention period is specified, 0-99939 days (1-4 
characters) may be entered. If this field is omitted, O-day retention 
period 1s assumed, and IOCS writes the date available i the communication 
region of the Supervisor. 


TLBL Default (Qutput3 

Source of Information 

Purpose: 

Provides a code to indicate that additional identification is required before 
a file can be considered the correct one for processing. 

Processing: 

On input, if this field is not X'40° IQCS calls phase S$IJJTSEC for further 
checking (see Macro User's Guide). On output IO0CS writes a space. 

TLBL Default (Qutput) : - 

Source of Information : System 


Purpose: 


Provides the number of physical records (blocks) written i file when it was 


na 
created. This can be used (as a "*hash'* total) to verify that all records have 
been processed, when the file is processed later as an input file. The number 


of records is the total of all physical records between the header and trailer 
labels of a logical file, excluding tapemarks. This field is used in trailer 
labels only. In header labels it contains character zeros. 


Processing: 

For a read forward input file, IOCS OPEN sets a counter to zero. During 
processing, IOCS routines accumulate a counter of the blocks read from the 
tape. At the end of the file or volume, IOCS checks the accumulated count 
against that in the block count field of the trailer label. If an input file 
is read backwards, IOCS stores the block count read from the trailer label on 
OPEN, and decrements the count during processing. At the end of the file 
C(header label), IOCS CLOSE checks the decremented count against the zero in 
the block count field of the header label. A Read backwards file must be 
contained within one volume. If the accumulsted block count does not agree 
With the count in the trailer label (Cor header label on read backwards), a 
message is given to the operator who may ignore the error or terminate the 
job. On output, IOCS OPEN writes character zeros in this field of the header 
label. During processing, IOCS routines accumulate the block count and write 
it in the trailer label at the end of the file or volume. In a multivolume 
Ney ee ce trailer label contains the number of blocks written on that 
volume only. 


(Part 4 of 5). Tape Standard File Label 1 CASCII Mode) 
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TLBL Default (Output) : - 
Source of Information : System for Output 


Purpose: 

Provides a code to indicate the IBM Programming System under which this file 
is written. This can be of value when an installation uses more than one 
programming system. 


Processing: 
On input I0CS ignores this field. On output IOCS OPEN/CLOSE writes the code 


supplied by the user. If none is supplied by the user, IOCS writes 
IBMDOSVSbbbbb in this fieid. 


TLBL Default (Output) 
Source of Information 
Purpose: 
S This field is reserved for future usSe as required for American National 
Standards Institute, Inc. 


Processing: 
On input IOCS ignores this field. On output, [OCS writes spaces. 


Figure 41 (Part 5 of 5). Tepes eteare File Label 1 CASCII Mode) 
ields 


IBM-standard file labels are 80 bytes long. Each file has a header and 
a trailer label which have the same format, for reading the tape forward 
or backward. The first four characters of each label identify the 
particular label: 
a header label -- HDRI, Bean tratler label -- EOF1,EOF2 at the end of 
a file 
EOV1,EOV2 at the end of 


a volume but not of 
the file HDR2, EOF2 and EQOV2 for ASCII only. 


Additional labels C€HDR3 to 8) are ignored by VSE. 
User-Standard File Labels on Tape 


Figure %2 shows user-standard file label format for tapes. 


‘Se Displ, Field Length Content 
3 Label ID: URL or UTL 


Dl 
D2 1 Label sequence number: 1 to 8 
D3 4C User's label information 


Figure G42. User~-Standard Tape File Label 
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Source of Information : System 


Purpose: 
Identifies the standard volume label. 


Processing: 

On both input and output, JOCS checks this field 
volume label iS present on the tape when DTF FIL 
specified for the first or only file on a tape r 
volume label should be written previously, befor 
records is written on the tape. 


Source of Information System 


Purposes: 
Indicates t nee of this label within the user header CUHL ) or the uSer 
trailer lab group. 


Processing: 
This field is processed in conjunction with the label identifier €field 1) to 
completely identify the user header label or the user trailer label. 


Source of Information User 
Purpose: 


Provides a means for you to label your SAM/DAM file with any information you 
need in addition to that supplied by the standard labels. 


Figure 43. Tape User-Standard Label Fields 


User-standard labels are header labels located and processed before the 
data of the file, and trailer labels located and processed after the 
file. Header and trailer labels are identified by: 


User header labels UHLn User trailer labels UTLn 
n may be 1 to 8. 


User~-standard file labels are 80 bytes long. The first four bytes 
contain UHLn or UTLn and the remaining 76 bytes contain user data. 


You can include definitions or descriptions of the file in addition to 
that in the IBM-standard labels. For example, you may have a unique 
numbering system for file identification or you may have subcategories 
that you want to define for the files, or you may want to maintain an 
audit trail in these labels. 


Non-Standard File Labels on Tape 


Non-standard labels are only supported on EBCDIC code tape labels. They 
may have any length, do not have a specified identification in the first 
four characters, and do not have a fixed format. They may contain 
whatever information the user desires, and in any arrangement. They are 
completely the responsibility of the user. He should, however, use some 
of the features found in standard labels. For example: header labels 
must be distinguished from trailer labels, end-of-file trailer labels 
must be distinguished from end-of-volume trailer labels, and some name 
or number must identify the file to which the label belongs. 


When files with non-standard labels or unlabeled files are written on a 
volume, the volume label is destroyed. Therefore, these files can only 
be written on volumes that are not expected to be used again for files 

with standard labels. 
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rere 


When the system reads the DLBL or TLBL and EXTENT statements, it first 


stores the label 


records 
device. 


in this area 
It is shown 


information in the label area. The format of the label 


is not quite the same as the actual labels on the 
in VSE/Advanced Functions Diagnosis Reference: 


Initial Program Load and Job Control. 
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APPENDIX D: MASTER INDEX FOR VSE/ZADVANCED FUNCTIONS LIOCS 


—_ 


This Master Index contains references to the VSE/Advanced Functions 
Logical IOCS manuals. The number(s) after each entry is the key to the 
manual(€s) in which the information is found. The keys correspond to the 
following manuals. 


1. VSE/ZAdvanced Functions Itc Volume 1: General Information and 
Imperative Macros , LY33-9116. 


2. MVSE/ZAdvanced Functions LIOCS Volume 2: SAM , LY33-9117. 
3. VSE/Advanced Functions LJOCS Volume 3: DAM and ISAM , LY33-9118. 
4a. VSE/7Advanced Functions LIOCS Volume &: SAM FOR DASD , LY33-91139. 


ACB Caccess method control block) 1 
access methods 1, 2, 3 


direct l, 3 buffer 
indexed sequential 1, 3 C(MICR) 2 
sequential 1, 2, @ status indicator 2 
telecommunications 1 truncation, 3800 printer 2 
virtual 1 buffering, double 3 

ADD function CISAM) 3 byte, sync 2 


add to the overflow area 3 
adding records to a file 3 


address modification subroutine 1 Capacity record (RO) 3 
ADDRTR function CISAM) 3 card device files 2 
channel program builder 3 CCWs (basic), channel program builder 
end-of-file add CDMOD 2 
ESETL macro 3 CNWTRL macro 2 
GET macro 3 GET macro 2 
overflow area add 3 PUT macro 2 
prime data area add 3 chain reading of VTOC labels 4 
PUT macro 3 channel program builder 3 
READ KEY macro 3 ISMOD ADD 3 
SETL macro phase 1, S$$BSETL 3 ISMOD ADDRTR 
SETL macro phase 2, $$BSETLI 3 ISMOD, RANDOM RETRVE 3 
SETL macro phase 3, $SBSETL2 3 ISMOD, SEQNTL RETRVE 3 
WAITF macro 3 strings s 
WRITE KEY macro 3 CHECK macro 1, 2 
WRITE NEWKEY macro 3 MRMOD 2 
algorithm to calcualte upper/lower limits CIDF 4 
for FBA devices G4 CKD 
alteration factors 3 DASD file, contents of 4 
alternate switching 2 logical units 4 
EOV, tape 2 CLOSE macro 1 
system units, tape 2 close 
ANSI monitor 
control codes 2 functions 1 
tape file label 1 general chart 1 
tape volume label 1 phases 1 
ASCII Subroutines 1 
conversion tables l close 
standard volume label 1 routines 1, 2, 3, 4% 
associated files 2 alternate switching for EOV 2 
asynchronous processing 3 alternate switching for system units 
relative addressing extensions 3 2 
direct access DASD 3 
diskette 2 
B-transients (see logical transients) l, 2 DTFCP/DTFDI tape files 2 
3>4 DUMODFO 2 
basic telecommunications access method 1 EOF/EOV input forward 2 
block size, logical EOV output forward 
BSI (buffer status indicator) 2 files 1 
IJDPR3 2 
IJDPRT 2 
ISAM 3 
magnetic tape 2 
MICR 2 


optical reader files 2 
paper tape files 2 
printer files for 3800 2 
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punch files 2 

sequential DASD 4 

unit record files 2 

VTOC 


CLOSER macro 1 
CNTRL macro l, 2,5 3), 
CDMOD 
DAMOD- 3 
DAMODV 3 
DRMOD 
Magnetic tape 2 
ORMO 
printer files for 3800 2 
PRM 2 
sequential DASD 4 : 
COBOL, input file closing 2 
COCR 3 
codes, DTF type 


1 

combined files (DTFCD) 
command control block (CEB) 1 
common LIOCS routines 1 
common VTOC handler (CVH) G@ 
commonly used logical transients 1 
compiler files l, 

characteristics 2 

CPMOGD macro 2 

DTFCP 2 

initialization and termination 2 

logic module (CPMOD) 2 

open monitor 1 
console files (DTFCN) 1; 2 

close 2 

DTFCN macro 2 

GET macro 2 

open monitor J 

PUT macro 

(CI) & 


2 
control interval 
control l, 
block, access method (ACB) 1 
information 4G 
conventions for relative addresses 3 
conversion of relative addresses 3 
converting relative block addresses G 
count-key-data (CKD) addressing 4% 
COV 4 
CPMOD macro Md 


IOPTR=YES 2 

one I/O area 2 
TRCO=YES 2 

two I/O areas 2 
ameters 2 


IOPTR=YES 2 
one I/O area 2 
two I/O areas 2 
CPNOTE (DTFCP) G 
CPOINT CDTFCP) G 
CPOINTS (CDTFCP) G 
creation of tape volume labels 1 
cross reference list 
label 
phase name - CSECT 4 
cross-reference label List 1, 2, 3 
CVTOC 4 
cylinder 3 
index 3 
overflow area 3 
overflow control record 3 


par 
PUT 


DAM Cdirect access method) 3 

DAMOD 3 

DAMODV 3 

DASD file processing, sequential G 

DASD 1], ’ 
device independent functional support 
DTF dense type update open phase label 
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procedures for (LBRET macro) 1 
file protect l, 
files 

close routine 1 

open routine 1 


input files ] 

label information 3 

label information 1 

labels 

RDS common close data organization, VSAM 


data areas 2, % 
Magnetic tape 2 
PRT1/3800 printer support 2 
sequential DASD G4 
data security 1, 3 
indicator 3 
message writer 1 
declarative macros 1 
define the file (CDTFxx) 1 
interrelationship of instructions 1 
module generation (xxMOD) 1 
delete label 
open output sequential DASD 2 
sequential DASD open output G 
dequeue extent block entries 1 
dequeue for VSAM routines ($$BENDQB) Il 
descriptor byte, DAM channel program 
builder 
device independent DTF extension 1 
device 
independent files 2 
initialization and termination 2 
RPS interface 2 
system files (DI) 2 
release transient $S$BRELSE 1 


DFR macro 
DIMOD 2 
direct access method (DAM) 1, 3 
DASeN macro l, 
is 


error message writer 1 
Phase 1 
phase 2 1 
volume ID support 1 
diskette 
error message writer 1 
file labels 
files 
close routine 1 
module save areas 2 
open routine 1 
record format 2 
storage aren. 2 


display VTOC 
DLBLZEXTENT 
image Gq 
processing G 
DLINT macro 2 
DLIST & 
document information record 2 
DRMOD 2 
DSKXTNT table 3 
DSPLY macro Ly 
DTCP 2 
DTF CIJJGDTF) G 
DTF extension (IJJGDTFX) G 
DTF tables 1, 2, 3; 
DTFBG 1 
DTFCD 2 
DTFCN 2 
DTFCP 2 
DTFDA 3 
DTFDI 2 
DTFDR 2 
DTFDU 2 
DTFEN 1 
DTFIS 3 
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DTFMNR- 2 recovery, punch 2 
DTFMT 2 ESETL macro l, 3 
DTFOR 2 ADDRTR 
DTFPH 2, 3, 4 RETRVE, SEQNTL 3 
DAM 3 explanation of flowchart symbols 1, 2, 3 
diskette 2 extended buffering for the 3800 2 
magnetic tape 2 extending 
sequential disk G a file with ISAM 3 
DTFPR 2 information to user, DAM 3 
DTFPT 2 extents, console open output sequential G 
DTFSD 4G EXTRN symbol linkage 
DTFSR ] 
DTF 
address constants 1 factor, reconversion 3 
extensions 3 FBA 4 
types ] FEOV macro l, 2 
used by $S$BCLRPS 1 FEOVD 
DTFCD 2 macro l; 2 
DTFCN 2 processing G 
DTFCP 2, & field 
DTFDA DTF Extension G information record 2 
DTFDA macro 3 Sequence link 3 
DTFDI file protection G 
DTFDR 2 file l, = 
DTFDU additions 3 
DTFIS macro 3 definition macros 1 
DTFMR 2 Initialization and termination 1 
DTFMT 2 labels ’ 
DTFOR 2 DASD 1 
DTFPH 2, 3 diskette 1 
diskette 2 tape 1 
DAM 3 files, associated 2 
magnetic tape 2 fixed block architecture, definition of 4 
Sequential disk 4 flowchart 
DTFPR 2 labels 1, 3 
DTFPT 2 symbols Vig nly’ DS 
DTFSD 2 forced-end-of-volume 1», 2), 4&4 
dump VTOC format-1l label 
DASD extents in G4 
diskette 1 format 3 label, extent overflow 4 
duplicate device assignment 1 FREE macro l, 2, 
dynamics device release (RELEASE macro) 1 DAMOD 3 
DAMODV 3 
ISMOD, RANDOM RETRVE 3 
ENDFL macro 1, 3 
enqueue for VSAM routines (SSBENDQB) 1 
entry/sequenced data organization l generation macros», module 2 
LOAD 3 for diskette 
EOF add 3 GET logic for the 1017 paper tape reader 2 
EOF/EOV GETVCE output parameter list CIJJGGCP) G 
monitor 2 
routines, general chart 1 
EOV handling DASD labels 1 
and logical spacing routine 2 handling tape labels 1 
limits for prime data area 3 
ERET macro 
ERREXT 2, 3 I70 area requirements 3 
DUMODFI 2 I7O areas 
DUMODFO 2 add (blocked records) 3 
option 3 add Cunblocked records) 3 
parameter list 3 load 
ERROPT 2 retrieve (blocked records) 3 
DUMODFI 2 retrieve Cunblocked records) 3 
DUMODFO 2 ID, reference by (DAM) 3 
error conditions, DTFCP 4 IDLOC 3 
error/7status indicator 3 ignore open sequential DASD 2 
error ly. 25-3 IIPCLOSE 1 
exit routine 2 IIPOPEN 1 
message list, master 1 imperative 
message writer macro expansions 1 
data security 1 macros 
disk open phase l 1 independent overflow area 3 
disk open phase 2 1 index level pointer 
diskette open phase l 1 indexed sequential access method l, 3 
diskette open phase 2 1 indexes 
messages 2 cylinder 3 
option extension 3 master 


options extension 2 
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track 3 logic modules, channel program building 4% 
indicator, error/status 3 logic modules, versions of in SVA 4 
information record logic modules 2» 3» 

document 2 CDMOD 2 

field 2 CPMOD 2 

line 2 DAMOD- 3 
initialization DAMODV 3 

and termination l, 2, 3 DIMOD 2 

CP and DI files 2 DTFCN 2 
DAM 3 ISMOD 3 
magnetic tape files 2 MRMOD 2 
MICR files : ORMOD 2 
optical reader files 2 PRMOD 2 
procedures 3 PRT1 printers 2 
sequential DASD Cause 4 PTMOD 2 
unit record file SAM DASD 4 

Iocs 1 Tape 2 

ISAM Cindexed sequential access method) 1, 3 logic Processing 

close 3 magnetic tape 2 

file extension 3 sequential DASD 4 

ISAM DTF device type update open phase 3 logical 

macro instructions 3 Iocs 1 

add records to a file common routines 1 

load or extend a DASD oe 3 general information 1 

random retrieval 3 special purpose routines 1 

sequential retrieval 3 Spacing an EOV routines 2 
rotational positional sensing 3 transie 1 2,» 35 4 


ISMOD macro 
job control l, 2 


key 
referenced by DAM 3 
sequenced data organization 1 


ameter and I/O area 


rs 

4 

label 
cross-reference list 4 
information, DASD 3, 
list, flowchart 1, 2, 3 
processing 


D 41 
IBM standard volume 1 
nonstandard 1 
processing 1 
standard tape, file labels 1 
standard volume 
magnetic tape 1 
additional 1 
input file 1 
nonstandard 1 
output file 1 
processing 1 
standard file 1 
LBRET macro l, 4 
length field, sequence 3 
line information record 2 
pores Separate 3 
EXTRN 1 
interrelationship: example of 1 


ro l, 2 
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PRTOV 1, 2 Open/Close 2 
or 3800 2 master 
PTMOD- 2 error message list 1 
PUT 1, 2, 3 index, ISAM 3 
ADDRTR 3 message Writer interface table CIJJGIFT) 
CDMOD 2 message-module relationship 
CPMNOD 2 message 
DIMOD 2 code for disk open error 1 
DTFCN 2 cross-reference list 1, 2, 3, 4 
IJDPR3 2 writer 
PRMOD 2 writers 1, 2 
PTMOD 2 data security 1 
SEQNTL RETRVE 3 disk open phase l 1 
PUTR 1, 2 disk open phase 2 1 
RDLNE Lig 2 diskette data security 1 
READ 1, 2» 3 diskette open phase 1 1 
DRMOD 2 diskette open phase 2 1 
ID DAMOD 3 DTFCP/DTFDI 2 
KEY ADDRTR 3 magnetic tape 2 
KEY DAMOD- 3 MICR 2 
KEY RANDOM RETRVE 3 messages 1 
MRMOD- 2 $S$BOMSG1 1 
QRMOD 2 $$BOMSG2 1 
SPNUNB records 3 master error list 1 
VARUNB records 3 method of processing 1 
relationship MFCM 1, 2 
RELEASE 1 MFCU 1 
RELSE 1, 2 MICR 1 
RESCN 1, 2 buffe 2 
SEOV close 2 
SETDEV 1, 2 DTFMR macro 2 
SETFL 1 error messages 2 
LOAD 3 files 
SETL 1, 3 initialization and termination. 2 
ADDRTR 3 logic module (MRMOD) 2 
SEQNTL RETRVE 3 message writer 2 
TRUNC 1, 2 MRMOD macro 2 
WAITF 1, 2, 3 Saat 2 
DAMOD 3 ocket light indicators) 2 
DAMODV 3 MODLOOP 1 
DRMOD 2 address modification subroutine 1 
ISMOD ADD 3 Subroutines for open 
ISMOD ADDRTR- 3 modular 
ISMOD RANDOM RETRVE 3 generation macros (xxMOD) 1, 2 
MRMOD 2 tabular system 
ORMOD 2 modules 1, 2», 
WRITE 1, 2, 3 direct access method 3 
AFTER DAMOD 3 fixed-length records 2 
AFTER SPNUNB records 3 reenterable 1; 
AFTER VARUNB records 3 undefined records 2 
ID DAMOD 3 variable-length records 2 
KEY DAMOD' 3 MRMOD 2 
KEY ISMOD ADDRTR = 3 multiple track search 3 
KEY ISMOD RANDOM RETRVE 3 
NEWKEY ISMOD ADD 3 
NEWKEY ISMOD ADDRTR 3 nonstandard tape labels 1 
NEWKEY ISMOD LOAD 3 normal add to prime data area 3 
RZERO DAMOD 3 NOTE macro l; 
RZERO SPNUNB records ' 3 
RZERGO VARUNB records 3 
SPNUNB records 3 OMR/RCE format open routines 2 
VARUNB records 3 open VTOC COVTOC) macro 4 
macros 1 OPEN/CLOSE and problem program save area 
declarative 1 CIJIGSVEA) 
imperative 1 OPEN/CLOSE general modules/routines 
module generation 1 B-transients 
magnetic ink character recognition (MICR) monitor, functions of 1 


files 1, 
Magnetic Tape File 
close monitor f 
Data areas 
DTFMT macro 2 
DTFPH macro 2 
Tape Labels 2 
Label Processin 
Logic Processin 
message writers 
open, general c 
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§ dis 2 
unctions 1 


g l, 
g 2 

1, 2 
hart 1 


Master Index 


OPEN/CLOSE logic 2, 
DAM 3 


ISAM 3 
OPEN 1, 2,» 3) 4 
console files 2 
DAM l; 
general chart 1 
user labels 
device independent files 
device independent files 
diskette files 2 
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2 
» RPS interface 
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OPE 
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opt 


org 
ORM 
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ar 
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FR 
ha 
phy 
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DTFCP/DTFDI 2 
input tape 2 
labeled input file 2 
output tape 2 
ignore CS$BOPIGN) 1 
IJDPR3 2 
IJDPRT 
input ential DASD G4 
ISAM 
general chart 1 
logic DAM, general chart 3 
logic ISAM, general chart 3 
macro 
magnetic tape files l,» 2 
general chart ] 
monitor J 
SSBOPENIL phase 1 
SSBOPEN2 phase 2 
card device files ] 
compiler files 1 
console files 1 
DAM files 1 
general chart 1 
ISAM files 1 
magnetic tape files 1 
MICR files 1 
optical reader files 1 
phases 
routines ] 
telecommunications files 1 
unit record files 
OMR/ZRCE routines 2 
optical reader files 2 
printer files 
printer files for 3800 2 
extended buffering 2 
punch files 
reader files 2 
routines 1 


unit record files 2 
work files 2, 4 


NC macro duplicate device assignment 


NR macro DTF address constants 
ical reader COR and DR) files 
close monitor 1 

DRMOD macro 2 

DTFDR macro 2 

DTFOR macro 2 

open routine 1 

ORMNOD macro 2 

anization, VSAM data 1 

OD e2 

rflow area 3 

cylinder 3 

ISMOD ADD 3 

upper limits 3 


Oc, format of G 
er tape 1, 2 
files, close monitor 1 
punch error recovery 2 
ameter list, ERREXT 3 
ABB, MICR 2 
(punch/feed/read) files 2 
se-name - CSECT cross-reference list 
sical I0CcS 2 


magnetic tape (CDTFPH) 2 
sequential dasd (DTFPH) 2 
CS/LIOCS interrelationship 1 
NTR macro 1 

NTS macro i 

NTW macro 1 

me data area EOV limits 3 
nter files Le 2 

close monitor 1 
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G 


open monitor 1 
printer 
PRMOD 2 
VTOC CPVTOC) macro 4 
ASD tse 1 


2 
ped/read (PFR) files 2 


ic oe sre 1018 paper tape punch 
o , ’ 


AWS 
7% 
e) 
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PUTR macro 
PVTOC, forma 


RCE open routines 2 
RDF/CIDr reference overlay CIJGXZRDF) 
RDLNE macro l, 2 
RDONLY 
read cylinder index into storage 3 
read format 3 label (IJJGVD10) 4 
READ macro 1, 2, 3 
DRMOD 2 
ID DAMOD- 3 
KEY DAMOD 3 
KEY ISMOD ADDRTR 3 
KEY ISMOD RANDOM RETRVE 3 
MRMOD 2 
ORMOD 2 
reader file open 2 
reading VTOC labels 4 
reconversion factor 


3 

record definition field (RDF) 4 
record l, 2, 3 

document information 2 

field information 2 

format 2 

ID returned CIDLOQC) 3 

line information 

relationship of format 2 

Spanned 

types 3 

zero (RO) 3 
reenterable modules 1, 3 
reference 

by ID CDAM) 3 

by KEY (DAM) 3 

methods and addressing systems 3 
relative 

address conversion 3 

addressing conventions 3 
ASE macro 
cate DTF address constants 1 
macro l,; 


anslate subroutine 
fixed-length records 2 
undefined records 2 
variable-length records 2 
TRUNC 2 
work area subroutine 2 
WRITE work files 
rename VTOC label G 
requirements 
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for I/O areas 3 table 
storage 1 DSKXTNT 3 
RESCN macro 1, 2 PDTABB for MICR 2 
RETRVE Function random (ISAM) 3 tabular modular system 1 
channel program builder 3 linkage 
FREE macro 3 tape error statistics (TES) l 
READ KEY macro 3 tape labels procedure (LBRET macro) 
WAITF macro 3 tape volume labels, creation of 1 
WRITE KEY macro 3 tape 2 
RETRVE functions sequential CISAM) 3 tapemarks 1 
channel program builder 3 telecommunications access methods 1 
ESETL macro 3 termination procedures 3, 
GET macro 3 termination 1; 
PUT macro 3 file 1 
SETL Lele (S$SBSETL) 3 of DAM 3 
SETL macro (S$$BSETL1) 3 procedures 3, 4 
RETRVE Been CISAM) 3 TES 
phase l 3 processor l 
phase 2 3 support 1 
returned record ID CIDLOC) 3 track 
rotational positional sensing CRPS) G hold function 1 
RPS index 
DTF extension work area l search, multiple 3 
indicators trademarks, placement of e 
phase loading 1 trailer labels or tape, user 1 
SVA initialization 1 translation, paper tape files 2 
TRC (table reference character) 2 
CPMOD 2 
SAM (sequential access method) 1, 2, 4 DTFCP 
scratch VTOC label 4G DTFDI 2 
search multiple tracks 3 DTFPR 2 
seek overlap subroutines 3 PRMOD - PUT macro 2 
eorer TNS tape lister (STL) 2 truncation 2 
SEO G IJDPR3 2 
2 EoV macro 3800 buffer 2 
sequence enh field 3 type code, DTF 1 
entries 3 types of records 3 
index level pointer format 3 
sequential access DASD files 4 
sequential access method (SAM) l, 2 UNIT RECORD FILES 1,) 2 
sequential processing 1 CLOSE MONITOR 1 
SETDEV macro l, 2 CLOSE ROUTINE 1 
SETFL macro OPEN MONITOR 1 
LOAD 1, 3 OPEN ROUTINE 1 
SETL macro unlabeled MT file aption 2 
ISMOD ADDRTR 1, 3 unlabeled tape files 1 
ISMOD SEQNTL RETRVE 1, 3 upper/lower limits for FBA devices, 
shared virtual area (SVA) 4G algorithm to calculate 4 
software end-of-file (SEOF) G user label parameter list (CIJJGULTB) G 
spanned records 4G user label processor 
control field 3 for input files G4 
READ macro 3 for output files 4 
WRITE AFTER macro 3 user labels l, 
WRITE macro 3 magnetic tape 1 
WRITE RZERO macro 3 
Special purpose routines for LIOCS 1 
split cylinder extents 4 VARUNB records 3 
Standard READ macro 3 
label processing 1 WRITE after macro 3 
tape file labels 1 WRITE macro ee 
STL control fields 2 WRITE RZERO 3 
storage requirements 1 version 3 DTF (TIGVERS) 4 
supervisor SYSFIL routine, function of G4 virtual storage access method (VSAM) 1 
support, TES 1 virtual transients Clogical transient 
SVA to LTA bridge 2, 4 extension running in virtual) 1 
switching, alternate 2 S$VOPENT 1 
symbols, flowchart 1, 2, 3 volume descriptor list CIJJHDLST) 4G 
syne byte 2 volume label 2 
SYSFIL volume labels DASD/diskette 1 
logic modules 4 VSAM (virtual storage access method) 1 
logical units 4G data organization 
system files, device independent 2 VSE/BTAM 1 
system files VTOC 
SYSIPT 4 closing of G4 
SYSLST 4 display phase 1 1 
SYSPCH 4 display phase 2 1 
SYSRDR 4&4 
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display phase 3 (diskette) 1 DAMOD 3 
dump l SPNUNB records 3 
dump (diskette) 1 VARUNB records 3 
list 1 WRITE ID macro 3 
list (diskette) 1 DAMOD 3 
label processing G WRITE KEY macro 3 
opening of G4 DAMOD ' 3 
reading labels of 4 ISMOD ADDRTR 3 
rename label in 4 ISMOD RANDOM RETRVE 3 
scratch label 4 WRITE macro l, 2, 3 
writing labels to G SPNUNB records 3 
VARUNB records 3 
WRITE NEWKEY macro 
WAITF macro 1, 2, 3 ISMOD 3 
DAMOD- 3 ISMOD 3 
DAMODV 3 ISMOD 3 
DRMOD 2 ISMOD 3 
ISMOD 3 write requests, types of 4 
ISMOD' 3 WRITE RZERO macro 
ISMOD 3 DAMOD- 3 
ISMOD 3 SPNUNB records 3 
MRMOD 2 VARUNB records 3 
ORMOD 2 writing VTOC labels 4 s 
WRITE AFTER macro 3 ) 
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INDEX 


ca 


ACB Caccess control block) 5 
Acces Method Services (AMS) 105 
access methods 
direct 2 
indexed sequential 2 
sequential 
telecommunications 3 
virtual 2 
additional file labels on 
tape 
address modification 
subroutine 


AMS CAccess Method a ae 105 


ASCII conversion tables 
audit trail 134, 172 


B-transients 

See logical transients 
backspace CBSL 15 
basic telecommunications access 
method 
BSL (backspace) 15 
BTAM-ES 3 


CCB Ccommand control block) 7 
check duplicate device 
assignements 
for logical units 42 
CHECK macro 12 
CLOSE macro 13 
close monitor 
DASD files 34, 44 
diskette files 34, 44 
general chart 60 
general chart, part 2 61 
general chart, part 3 62 
ISAM files 44 
label space processing 4 
magnetic ink character 
recognition 
C(MICR) file 


5 


close routines 
files 33 
close sequential DASD 
FEOVD 46 
free track function 46 
input and output 46 
CLOSER macro 
CNTRL macro 14 
codes, DTF type 6 


command control block? (¢ 
common LIOCS routines 3 
commonly used logical 
transients 
compiler file, open monitor 40 
console file, open monitor 40 
control block, access method 
(ACB) 5 
creation of tape volume 
labels 34 


Lo | 


DAM (direct access method) 2 
DAM device independent extension 
work area 
DASD 
file protect 47 
label procedure (for LBRET 
macro) 20 
label processing 36 
input files 37 
output files 37 
DASD files 
close routine 34 
open routine 33 
DASD RPS common close 45 
data organisation, VSAM 2 
declarative macros 1, G 
define the file (DIF xx) 4G 
module generation (xxMOD) 4 
dequeue extent block entries 46 
device independent DTF extension 
work area G7 
evice release transient 
(S$S$BRELSE) 47 
irect access method (DAM) 2 
IS 6 
is 


CCB) 7 
9 


EN macro 

kette files 

close routine 34 

label processing 37 
input files 37 
output files 38 

open routine 33 

diskette open 
input», general chart 64% 
output, general chart 65 

(Device Support 
ity) 132 


16 
efine the File) 105 
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DTFSR 5 
DTF types 6 
DTF types used by $$BCLRPS 46 
duplicate device assignement 
dynamic device release (RELEAS 
macro) 8 


[LE | 


ENDFL macro 17 

enqueu/dequeue for VSAM 
routines 4G 

entry-sequenced data 
organization 
EOF/EOV routine, 
chart 63 

ERET macro 17 
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